COBOLでバックスペースキーまたは左右の矢印キーをキャプチャすることはできますか？

Question

ACCEPTステートメントを使用して矢印キーストロークをキャプチャします。私は今これを持っています：

ACCEPT MY-DUMMY 
    CONTROL KEY IN MY-KEYSTROKE 

これは上下矢印のために働いています。ただし、左矢印と右矢印の場合、これらのキーは入力フィールド内をナビゲートするためにランタイムによって使用されるため、機能しません。

これらのキーストロークをキャプチャする方法は、このACCEPTのみであり、ホストがそれらを消費するのを防ぐ方法はありますか。

• コンパイラ：ACUCOBOL-GT（私はどのバージョンを知っているか、まだ解放されません）
• オペレーティングシステム：Windowsの受け入れ答えに加えて10

---

：

左と右の区別を区別するために例外キーの前に例外コードを付加することができますwキーストローク。デフォルトでは

SET ENVIRONMENT "KEYSTROKE" TO "EXCEPTION=054,Left kl" 
SET ENVIRONMENT "KEYSTROKE" TO "EXCEPTION=055,Right kr" 
SET ENVIRONMENT "KEYSTROKE" TO "EXCEPTION=201,BkSp ZB" 

ACCEPT DUMMY 
    CONTROL KEY IN MY-KEYSTROKE 
EVALUATE (MY-KEYSTROKE) 
    WHEN 054 
     PERFORM DO-SOMETHING 
END-EVALUATE 

Answer 1

（ ACUCOBOL runtime manualより引用）ACUCOBOLについては

、左と右の矢印は、編集キーとして機能し、上下の矢印は、編集と例外キーの両方として動作します。実行時に矢印の動作を変更して、必要に応じて異なるモード間で切り替えることができます。これは、SET ENVIRONMENT動詞と適切なKEYSTROKEの設定で行います。

SET ENVIRONMENT "KEYSTROKE" TO "EXCEPTION=055,Left kl" 
SET ENVIRONMENT "KEYSTROKE" TO "EXCEPTION=056,Right kr" 
ACCEPT OMITTED CONTROL KEY IN MY-KEYSTROKE 
SET ENVIRONMENT "KEYSTROKE" TO "EDIT=Left kl" 
SET ENVIRONMENT "KEYSTROKE" TO "EDIT=Right kr" 

もACUCOBOL User Guide, key table参照してください。

BTW：「新しい」ACUCOBOLバージョン（「完全に古くなっていない」と読む）は、ACCEPT OMITTEDをサポートしています。