Previous Topic Next topic Print topic


CBL_WRITE_SCR_N_CHATTR

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

Restriction: This routine is supported for native COBOL only.

Syntax:

call "CBL_WRITE_SCR_N_CHATTR" using     screen-position
                                        character
                                        attribute-buffer
                                        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.
character
Call prototype (see Key): cblt-x1-compx
Picture: pic x.
attribute-buffer
Call prototype (see Key): cblt-x1-compx
Picture: pic x.
fill-length
Call prototype (see Key): cblt-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
character The character to write.
attribute-buffer The attribute(s) to write. Use the following table to set one or more attributes:
B"10000000" BACKGROUND HIGHLIGHT
B"01000000" BACKGROUND-COLOR (RED)
B"00100000" BACKGROUND-COLOR (GREEN)
B"00010000" BACKGROUND-COLOR (BLUE)
B"00001000" FOREGROUND HIGHLIGHT
B"00000100" FOREGROUND-COLOR (RED)
B"00000010" FOREGROUND-COLOR (GREEN)
B"00000001" FOREGROUND-COLOR (BLUE)
fill-length The number of screen positions to write the character-attribute pair 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.

Previous Topic Next topic Print topic