Previous Topic Next topic Print topic


X"A7" functions 20 and 21

Reads and sets system attributes.
Restriction: This routine is supported in native COBOL only.

Syntax:

call X"A7" using     function-code
                     sys-attr-array
           returning status-code

Parameters:

function-code
Call prototype: cblt-x1-compx
Picture: pic x comp-x.
sys-attr-array
Group containing:
01 sys-attr-array
  03 sys-attr   cblt-x1-compx occurs 16   *> pic x comp-x occurs 16 times.
status-code
See Library Routines - Key

On Entry:

function-code
Defines the action:
20 Read system attributes
21 Set system attributes
sys-attr-array
Contains the system attributes to set. The attributes are used for:
sys-attr-1 Invisible
sys-attr-2 Reverse video
sys-attr-3 Normal
sys-attr-4 Highlighted
sys-attr-5 Normal underlined
sys-attr-6 Highlighted underlined
sys-attr-7 System normal
sys-attr-8 Flashing highlighted
sys-attr-9 Unused
sys-attr-10 User reverse
sys-attr-11 User normal
sys-attr-12 User highlighted
sys-attr-13 Unused
sys-attr-14 Unused
sys-attr-15 Unused
sys-attr-16 Operating system normal

On Exit:

sys-attr-array
Contains the system attributes read.

Comments:

System attributes are used by some parts of the system to display screens in various colors or shades (depending on the type of screen). This means that by changing the system attributes, you can colorize displays to a particular choice. These calls can be used if you use components such as Panels which require attribute values as part of their parameters.

If you want to alter any of the attributes you should first read the current setting of the attributes, update the attribute array with any changes you want to make and then set the attributes. Doing things this way ensures that you do not affect the settings of any of the attributes which you are not interested in.

Previous Topic Next topic Print topic