1 つ以上の COBOL 属性値 (属性表の索引) のそれぞれに関連付けられる、文字属性および前景カラーマップと背景カラーマップの索引を定義します。
call "CBL_SCR_SET_ATTRIBUTES" using table-count
attribute-index
attribute-value
returning status-code
01 cblt-generic-attr-value typedef. 03 cblte-gav-foreground-color-attr cblt-x4-compx. *> pic x(4) comp-x. 03 cblte-gav-background-color-attr cblt-x4-compx. *> pic x(4) comp-x. 03 cblte-gav-character-attribute cblt-x1-compx. *> pic x comp-x. 03 cblte-gav-filler cblt-x1-compx occurs 3. *> pic x(3).