The CBL_WRITE_SCR_N_ATTR routine is one of a set of library routines that facilitate reading and writing attributes on the screen. This routine writes a specified attribute to a string of positions on the screen.
CALL "CBL_WRITE_SCR_N_ATTR" USING SCREEN-POSITION, ATTRIBUTE, 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, contains the screen position at which to start writing (the top left corner is row 0, column 0)
|ATTRIBUTE PIC X COMP-X.||On entry, contains the attribute 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.|
|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. The ATTRIBUTE parameter contains the attribute to write to the screen location, and STRING-LENGTH is the length of that attribute string.