文字列およびその属性を、画面からの文字列で入れ替える。
制約事項: このルーチンはネイティブ COBOL でのみサポートされる。
構文：
call "CBL_SWAP_SCR_CHATTRS" using screen-position
character-buffer
attribute-buffer
string-length
returning status-code
パラメーター
- screen-position
- 定義済みの cblt-screen-position として以下を含む集団。
cblt-screen-position containing:
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 になる。「スクリーン ルーチン」を参照。 |
| 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 |
書き込む文字列の長さ。画面の末尾に達すると、書き込みは画面の末尾で終了する。 |
出力パラメーター：
| character-buffer |
画面から読み込む文字。このデータ項目は少なくとも string-length で指定した長さであり、その長さを越えた位置は変更されない。 |
| attribute-buffer |
画面から読み込む属性。このデータ項目は少なくとも string-length で指定した長さであり、その長さを越えた位置は変更されない。 |
| string-length |
画面の末尾に達すると、入れ替えた長さがセル単位、つまり文字と属性のペアで返される。 |