The CBL_WRITE_SCR_N_CHATTR routine is one of a set of library routines that facilitate reading and writing attributes on the screen. This routine writes a specified character and attribute to a string of positions on the screen.
CALL "CBL_WRITE_SCR_N_CHATTR" USING SCREEN-POSITION, CHARACTER, 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)
|CHARACTER PIC X COMP-X.||On entry, contains the character to write|
|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 CHARACTER parameter contains the character to write to the screen location, and ATTRIBUTE contains that character's corresponding attribute. STRING-LENGTH is the length of that character/attribute string.