画面から文字列およびその属性を読み込む。
制約事項: このルーチンはネイティブ COBOL でのみサポートされる。
構文:
call "CBL_READ_SCR_CHATTRS" using screen-position
character-buffer
attribute-buffer
string-length
returning status-code
パラメーター
- screen-position
- 定義済みの cblt-screen-position として以下を含む集団。
01 cblt-screen-position typedef.03 cblte-scrp-row cblt-x1-compx.*> pic x comp-x.03 cblte-scrp-col cblt-x1-compx.*> pic x comp-x.
- character-buffer
- 呼び出しプロトタイプ使用時 (説明の読み方):pic x (n)
- PIC:pic x (n)
- attribute-buffer
- 呼び出しプロトタイプ使用時 (説明の読み方):pic x (n)
- PIC:pic x (n)
- string-length
- 呼び出しプロトタイプ使用時 (説明の読み方):cblt-x2-compx
- PIC:pic x (2) comp-x
- status-code
- 「説明の読み方」を参照
入力パラメーター:
screen-position |
読み込みを始める画面位置。画面の左上隅が行 0 および列 0 になる。「スクリーン ルーチン」を参照。 |
string-length |
読み込む文字列の長さ。 |
出力パラメーター:
character-buffer |
画面から読み込む文字。このデータ項目は少なくとも string-length で指定した長さであり、その長さを越えた位置は変更されない。 |
attribute-buffer |
画面から読み込む属性。このデータ項目は少なくとも string-length で指定した長さであり、その長さを越えた位置は変更されない。 属性は次のとおり。
B"10000000" |
OVERLINE |
B"01000000" |
REVERSE-VIDEO |
B"00100000" |
LEFTLINE |
B"00010000" |
UNDERLINE |
B"00001000" |
FOREGROUND HIGHLIGHT |
B"00000100" |
FOREGROUND-COLOR (RED) |
B"00000010" |
FOREGROUND-COLOR (GREEN) |
B"00000001" |
FOREGROUND-COLOR (BLUE) |
|
string-length |
画面の末尾に達すると、読み込まれた長さがセル、つまり文字と属性のペアで返される。 |