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-95
TERMINALINFO Statement
TERMINALINFO Statement
The TERMINALINFO statement returns information about terminals. From this
information you can determine what action is to be taken if a terminal does not support
the required extended field attributes.
data-name
specifies the Working-Storage group item template for color, highlight, and outline
display attributes supported by a terminal.
The information returned by the TERMINALINFO statement is placed in an elementary
item defined in the Working-storage Section. The Working-Storage group item template
for color, highlight, and outline display attributes must be defined in Working-Storage
as follows:
01 WS-TERMINAL-INFO.
02 DEVICE-VIDEO-STATUS-ATTR PIC S9(04) COMP VALUE 0.
02 DEVICE-VIDEO-STATUS-COLOR PIC S9(04) COMP VALUE 0.
02 DEVICE-VIDEO-COLOR.
03 IBM-PARTIAL-COLOR PIC 9(4) COMP.
03 IBM-FULL-COLOR PIC 9(4) COMP.
03 FILLER PIC 9(4) COMP.
02 DEVICE-VIDEO-ATTRIBUTES.
03 IBM-BASE-ATTR PIC 9(4) COMP.
03 IBM-FIELD-REVERSE PIC 9(4) COMP.
03 IBM-FIELD-BLINK PIC 9(4) COMP.
03 IBM-FIELD-UNDERLINE PIC 9(4) COMP.
03 IBM-FIELD-OUTLINE PIC 9(4) COMP.
•
DEVICE-VIDEO-STATUS-ATTR indicates the level of support for the REVERSE,
BLINK, and UNDERLINE highlight display attributes requested in a SET
MINIMUM-ATTR statement.
°
1 indicates the terminal has more capability than requested.
°
0 indicates the terminal has the same capability as requested.
°
-1 indicates the terminal has less capability than requested.
If no SET MINIMUM-ATTR statement was issued, the reply indicates the capability
of the terminal to support the default (that is, no highlight, color, or outline display
attributes).
•
DEVICE-VIDEO-STATUS-COLOR indicates the level of support for color display
attributes requested in a SET MINIMUM-COLOR statement.
°
1 indicates the terminal has more capability than requested.
°
0 indicates the terminal has the same capability as requested.
°
-1 indicates the terminal has less capability than requested.
TERMINALINFO USING data-name.