The CBL_WRITE_SCR_CHATTRS 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 and their attributes to the screen.
CALL "CBL_WRITE_SCR_CHATTRS"
USING SCREEN-POSITION, CHARACTER-BUFFER, ATTRIBUTE-BUFFER,
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-BUFFER PIC X(N). | On entry, contains the characters to write |
| ATTRIBUTE-BUFFER PIC X(N). | On entry, contains the attributes 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. STRING-LENGTH specifies the length of the string to be written, starting from SCREEN-POSITION. When the routine exits, CHARACTER-BUFFER contains the string of characters written, and ATTRIBUTE-BUFFER contains those characters' attributes.