キーボードから文字を取得します。
構文:
call x"AF" using function-code
key-status
パラメーター:
- function-code
- 呼び出しプロトタイプ:cblt-x1-compx
- ピクチャ:pic x comp-x
- key-status
- 次を含むグループ:
01 key-status
03 key-type pic x. *> pic x.
03 key-code-1 cblt-x1-compx *> pic x comp-x.
03 key-code-2 cblt-x1-compx *> pic x comp-x.
入力パラメーター:
- function-code
- 値は 26 です。
出力パラメーター:
- key-type
- 読み込まれるキー タイプは、次のとおりです。
1 |
ユーザー定義のファンクション キー |
2 |
Adis ファンクション キー |
3 |
データ キー |
9 |
エラー |
- key-code-1
- key-type が 1 または 2 の場合には、ユーザー定義キーには 0 ~ 127、Adis キーには 0 ~ 39 のキー番号が設定されます。ファンクション キーの詳細は、『Programmer's Guide to Creating User Interfaces』の「Adis 構成ユーティリティ (Adiscf)」の章を参照してください。
key-type が 3 の場合は、押されたキーの ASCII コードです。
key-type が 9 の場合は、エラー コードです。
8 |
使用不能な文字が入力された場合は、key-code-2 にはその文字が格納されます。 |
9 |
無効なキーストローク (2 バイト以上) が発生しました。 |
コメント:
このルーチンにより、COBOL 画面操作システムも呼び出されます。