call "CBL_SWAP_SCR_CHATTRS" using screen-position character-buffer attribute-buffer string-length 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-buffer | The attributes 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. |
character-buffer | The characters read from the screen. This data item must be at least as long as specified by string-length; positions in it beyond that length are unchanged. |
attribute-buffer | The attributes read from the screen. This data item must be at least as long as specified by string-length; positions in it beyond that length are unchanged. |
string-length | If the end of the screen is reached the length swapped (in cells, that is, character-attribute pairs) is returned in here. |