CBL_WRITE_SCR_N_ATTR

Writes a specified attribute to a string of positions on the screen.

Restriction: This routine is supported for native COBOL only.

Syntax:

call "CBL_WRITE_SCR_N_ATTR"  using     screen-position
                                      attribute
                                      fill-length
                            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.

attribute

Call prototype (see Key): pic x1-compx

Picture: pic x.

fill-length

Call prototype (see Key): pic x2-compx

Picture: pic x (2) comp-x.

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
`attribute`	The attribute to write.
`string-length`	The number of screen positions to write the attribute to. 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.