CBL_SCR_GET_ATTR

Note: This routine is supported for native COBOL only.

Syntax:

call "CBL_SCR_GET_ATTR_INFO" using      attribute-info
                             returning status-code

Parameters

RGB-values

Group predefined as cblt-generic-attr-rgb-values containing:

01 cblt-generic-attr-information   typedef.
  03 cblte-gai-display-class       cblt-x1-compx.	 *> pic x comp-x.
  03 cblte-gai-colormap-size       cblt-x2-compx. 	*> pic x(2) comp-x.
  03 cblte-gai-colormap-flags      cblt-x1-compx. 	*> pic x comp-x.
  03 cblte-gai-bits-per-gun        cblt-x1-compx. 	*> pic x comp-x.

status-code

See Library Routines - Key.

On Entry:

None

On Exit:

cblte-gai-display-class

The class of the environment:

1	Monochrome
2	Read-only colormap
3	Read/write colormap
4	Read-only decomposed colormap
5	Read/write decomposed colormap

cblte-gai-colormap-size

Number of entries on the colormap.

cblte-gai-colormap-flags

Bits set as follows:

Bit 0

1	The colormap is read-write.
0	The colormap is read-only.

Bit 1

1	Environment allows virtual colormaps to be created.
0	Environment does not allow virtual colormaps to be created.

Bit 2

1	Reading back attributes read back the values written
0	Read back what is currently on the screen

cblte-gai-bits-per-gun

Number of significant bits of the RGB values that are actually used to drive the hardware. A value of zero indicates that the number of bits is unknown for the environment. If different guns have different numbers of significant bits the lowest number of bits is used.