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-27
CALL Statement
The TERMINATION-STATUS error numbers related to CALL ... ON ERROR
correspond directly to the Pathway error messages generated by the TCP in the 3000
through 3999 range. For example, TERMINATION-STATUS error 114 corresponds to
Pathway error message 3114. For descriptions of the messages, see the TCP messages
in the Compaq NonStop™ Pathway/iTS System Management Manual.
Note that TERMINATION-STATUS becomes undefined when TERMINATION-
STATUS is set for reasons other than CALL ... ON ERROR return.
Refer to the EXIT PROGRAM statement for additional information on programmatic
control of error conditions.
Compatibility for a Called Program
Programs compiled for a particular terminal type are allowed to call programs compiled
for any other terminal type. You must ensure that the called program is compatible with
the calling program so that the results are predictable. The following are considerations
regarding compatibility between a called and a calling program.
•
A conversational mode program running on a terminal with block mode capabilities
can call a block mode program that uses only features available on the terminal.
•
A program compiled with no terminal type specified (TERMINAL clause of the
OBJECT-COMPUTER paragraph) assumes a very limited set of screen display
attributes and can be called by nearly any other block mode program.
•
The screen display attributes used in the called program must be applicable to the
calling program; otherwise, the results are unpredictable.
•
The function keys defined as system names in the called program must be applicable
to the calling program; otherwise, the results are unpredictable.
•
The character sets used in the programs must be compatible. Note that if a called
program is compiled for a 6530 terminal and uses the default character set specified
in the terminal's configuration file, the USASCII character set is used until the first
DISPLAY BASE operation occurs.
•
During a DISPLAY BASE operation, a program unit is aborted if the terminal does
not support the attributes requested in the SET MINIMUM-ATTR or SET
MINIMUM-COLOR statement.
•
Termination status 71 indicates insufficient support for the color, highlight, or
outline display attributes requested.
For characteristics of different terminal types, see the Compaq NonStop™ Pathway/iTS
TCP and Terminal Programming Guide.