ページの先頭行へ戻る
NetCOBOL V12.2 MeFt/Webユーザーズガイド(HTML変換方式編)
FUJITSU Software

5.5.3 画面制御

5.5.3.1 アテンション情報の獲得

直前に行った入力処理の入力完了の要因となったアテンション情報を獲得します。

[参照方法]

入力後のSELECTED FUNCTION句を調査します。

[使用例]

画面を表示した後に入力処理を行い、入力完了の要因となったアテンション情報により処理を切り分けます。

MOVE "SAMP" TO DSP-FORMAT.
MOVE " " TO DSP-MODE.
MOVE "@ALLF" TO DSP-GROUP.
READ ディスプレイファイル.
IF DSP-ATTN = "E000" THEN
~ 「実行」キーを押した場合の処理 ~
END-IF.
IF DSP-ATTN = "F002" THEN
~ 「PF2」キーを押した場合の処理 ~
END-IF.