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
01 cblt-screen-position typedef. 03 cblte-scrp-row cblt-x1-compx. *> pic x comp-x. 03 cblte-scrp-col cblt-x1-compx. *> pic x comp-x.
screen-position | The screen position at which to start writing. The top left corner is row 0, column 0. See Screen Routines |
character-buffer | The characters to write. |
attribute | The attribute to write. |
string-length | The length of the string to write. If this would go off the end of the screen, the write finishes at the end of the screen. |
Comments:
The blink attribute is not supported on this COBOL system. Specifying that a character is to blink results in the character being displayed with a bright background color.