The CBL_READ_SCR_ATTRS routine is one of a set of library routines that facilitate reading and writing attributes on the screen. This routine reads a string of attributes from the screen.
CALL "CBL_READ_SCR_ATTRS"
USING SCREEN-POSITION, ATTRIBUTE-BUFFER, STRING-LENGTH
RETURNING STATUS-CODE
| SCREEN-POSITION Group item | Group item is defined as follows:
01 SCREEN-POSITION.
03 ROW-NUMBER PIC X COMP-X.
03 COLUMN-NUMBER PIC X COMP-X.
On entry, the screen position at which to start reading (the top left corner is row 0, column 0) |
| ATTRIBUTE-BUFFER PIC X(N). | On exit, this data item contains the attributes read from the screen. It must be at least the length specified by STRING-LENGTH. Positions in the data item beyond that length are unchanged. |
| STRING-LENGTH PIC XX COMP-X. | On entry, contains the length of the string to read
On exit, contains the length of the string read when the end of the screen is reached |
| STATUS-CODE Any numeric type | Returns 1 if successful, or 0 if not successful |
This library routine uses SCREEN-POSITION (in row and column coordinates) to determine the location to start the read operation. STRING-LENGTH specifies the length of the string of attributes to be read, starting from SCREEN-POSITION. When the routine exits, ATTRIBUTE-BUFFER contains the string of attributes read.