The CBL_WRITE_SCR_CHARS_ATTR routine is one of a set of library routines that facilitate reading and writing attributes on the screen. This routine writes a string of characters to the screen, giving them all the same attribute.
CALL "CBL_WRITE_SCR_CHARS_ATTR"
USING SCREEN-POSITION, CHARACTER-BUFFER, STRING-LENGTH,
ATTRIBUTE
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, contains the screen position at which to start writing (the top left corner is row 0, column 0) |
| CHARACTER-BUFFER PIC X(N). | On entry, contains the characters to write |
| STRING-LENGTH PIC XX COMP-X. | On entry, this item contains the length of the string to write. Note that the write stops at the end of the screen. |
| ATTRIBUTE PIC X COMP-X. | On entry, contains the attribute to write |
| 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 on the screen to begin the write operation. CHARACTER-BUFFER contains the string of characters to write, and STRING-LENGTH contains the length of that character string. The ATTRIBUTE parameter contains the attribute to apply to the character string.