Pathway/iTS SCREEN COBOL Reference Manual (G06.24+, H06.03+, Pathway/iTS 1.0+)
Procedure Division
Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001
6-91
SET MINIMUM-ATTR Statement
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.