The CBL_WRITE_SCR_N_CHAR routine is one of a set of library routines that facilitate reading and writing attributes on the screen. This routine writes a specified character to a string of positions on the screen.
CALL "CBL_WRITE_SCR_N_CHAR" USING SCREEN-POSITION, CHARACTER, 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|
|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 STRING-LENGTH is the length of that character string.