Pathway/iTS SCREEN COBOL Reference Manual (H06.10+, J06.03+)

Procedure Division
HP NonStop Pathway/iTS SCREEN COBOL Reference Manual—426750-003
6-124
SET MINIMUM-ATTR Statement
SET MINIMUM-ATTR Statement
The SET MINIMUM-ATTR statement establishes the minimum level of support for
highlight and outline display attributes.
data-name
specifies the Working-Storage group item template for highlight and outline display
attributes.
The Working-Storage group item template for highlight and outline display attributes
must be defined in Working-Storage as follows:
01 WS-MINIMUM-ATTRIBUTE.
02 FILLER PIC 9(04) COMP.
02 IBM-BASE-ATTR PIC 9(04) COMP.
02 IBM-FIELD-REVERSE PIC 9(04) COMP.
02 IBM-FIELD-BLINK PIC 9(04) COMP.
02 IBM-FIELD-UNDERLINE PIC 9(04) COMP.
02 IBM-FIELD-OUTLINE PIC 9(04) COMP.
•
IBM-BASE-ATTR specifies the set of field attributes currently supported by the C00
and previous releases of Pathway for terminals in the IBM 3270 family. If you do
not specify a SET MINIMUM-ATTR statement, the default value is IBM-BASE-
ATTR.
•
IBM-FIELD-REVERSE, IBM-FIELD-BLINK, and IBM-FIELD-UNDERLINE specify
the set of highlight display attributes available on terminals in the IBM 3270 family.
•
IBM-FIELD-OUTLINE specifies the set of outline display attributes for terminals in
the IBM 3270 family, specifically TOPLINE, LEFTLINE, RIGHTLINE,
BOTTOMLINE, and BOXFIELD.
A value of 1 is placed in the corresponding elementary item if that attribute is required.
For example, if you want reverse video and outlining, you move the value 1 into the
IBM-FIELD-REVERSE and IBM-FIELD-OUTLINE elementary fields. All other fields
are set to 0.
The mimimum level of support for highlight or outline display attributes does not
change until a subsequent SET MINIMUM-ATTR statement is executed, even if you
use a CALL statement to move between program units.
SET MINIMUM-ATTR USING data-name .