CBL_WRITE_SCR_CHARS_ATTR

Writes a string of characters to the screen, giving them all the same attribute.

Restriction: This routine is supported for native COBOL only.

Syntax:

call "CBL_WRITE_SCR_CHARS_ATTR" using     screen-position
                                          character-buffer
                                          string-length
                                          attribute-buffer
                                returning status-code

Parameters

screen-position

Group predefined as cblt-screen-position containing:

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.

character-buffer

Call prototype (see Key): pic x (n).

Picture: pic x (n).

string-length

Call prototype (see Key): cblt-x2-compx.

Picture: pic x (2) comp-x.

attribute-buffer

Call prototype (see Key): pic x (n).

Picture: pic x (n).

status-code

See Library Routines - Key.

On Entry:

`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.

On Exit:

None

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.