Syntax:
call "CBL_SCR_GET_ATTRIBUTES" using table-count
attribute-index
attribute-value
returning status-code
Parameters
-
table-count
- Call prototype (see Key): cblt-x2-compx
- Picture: pic x(2) comp-x.
-
attribute-index
- Call prototype (see Key): cblt-x1-compx occurs n times.
- Picture: pic x comp-x occurs n times.
-
attribute-value
- Group predefined as cblt-generic-attr-value containing:
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).
-
status-code
- See Library Routines - Key.
On Entry:
table-count
|
The number of attribute table entries to query. |
attribute-index
|
The table of indexes of the entries to query. |
On Exit:
table-count
|
The number of entries successfully queried. This is normally the number requested but is less if the call was not entirely successful. |
attribute-value
|
The table of attribute values corresponding to the indexes supplied. |
cblte-gav-filler
|
Unused. |