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.