画面に文字列を書き込み、そのすべての文字列に同じ属性を指定する。
制約事項: このルーチンはネイティブ COBOL でのみサポートされる。
構文:
call "CBL_WRITE_SCR_CHARS_ATTR" using screen-position
character-buffer
string-length
attribute-buffer
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)
- string-length
- 呼び出しプロトタイプ使用時 (説明の読み方):cblt-x2-compx
- PIC:pic x (2) comp-x
- attribute-buffer
- 呼び出しプロトタイプ使用時 (説明の読み方):pic x (n)
- PIC:pic x (n)
- status-code
- 「説明の読み方」を参照
入力パラメーター:
screen-position |
書き込みを始める画面位置。画面の左上隅が行 0 および列 0 になる。「スクリーン ルーチン」を参照。 |
character-buffer |
書き込む文字。 |
attribute-buffer |
書き込む属性。次の表を使用して、1 つ以上の属性を設定する。
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 |
書き込む文字列の長さ。画面の末尾に達すると、書き込みは画面の末尾で終了する。 |
説明:
この COBOL システムでは、点滅の属性はサポートされない。点滅を指定した文字は、明るい背景色で表示される。