ACCEPT 操作の正常終了

ACCEPT 操作の正常終了時には、key-type には値 0 が、key-code-1 には次の値が返されます。

48: 0 を表す ASCII コード。ACCEPT 操作が Enter キーを押して終了されたことを表します。
1: 画面の最後のフィールドへの自動スキップで ACCEPT 操作が終了されたことを表します。

例

     accept data-item at 0101
     if key-type = "0"
     and key-code-1 = 48
       display "Terminated by return key"
     else
       display "Terminated by auto-skip last field"
     end-if.