-------------------------------------------------------------------------------------------
その6)画面入力待ちでなくてもPFキーを有効にする方法。
-------------------------------------------------------------------------------------------
通常はACCEPT待ちで、終了キーを判定しますが、ACCEPT待ちにしたくない場合などに利用します。
方法はFUNCTION−KEYを利用します。
VBのように割り込みが入ったらサブルーチンを実行と言う形にはできません。
自分でIF命令を要所要所にいれておく必要があります。
-------------------------------------------------------------------------------------------
(コメント)サンプルプログラムはACCEPT待ちでも問題がありませんが、結果を画面表示する場合、ACCEPT待ちだといつまでも終わらないので、時間が立てば自動的に終わりたい時などに使います。
後で上げておきますので、「COBOLサンプルプログラム1」を参考にしてください。