COBOL Manual for TNS/E Programs (H06.08+, J06.03+)

GLOBAL
NOTE: Do not use GLOBAL in the Declaratives Portion (page 238).
applies the declarative exception procedure to the program in which the USE statement appears
and to any programs nested within that program, unless such a nested program has its own
declarative exception procedure for that particular exception.
EXCEPTION, ERROR
introduce the exception procedure and specify that the procedure is to be performed after the
COBOL run-time input-output error routine, or when an invalid-key or at-end condition arises
and no INVALID KEY or AT END phrase is present in the statement then executing.
file-name
is a file description name that is to use this USE statement when an exception occurs. A given
file-name can occur in only one USE statement in a given program. Sort-merge file
description names are not permitted.
INPUT
specifies that all files opened in INPUT mode that are not specified explicitly in another USE
statement are to use this USE statement.
OUTPUT
specifies that all files opened in OUTPUT mode that are not specified explicitly in another USE
statement are to use this USE statement.
I-O
specifies that all files opened in I-O mode that are not specified explicitly in another USE
statement are to use this USE statement.
EXTEND
specifies that all files opened in EXTEND mode that are not specified explicitly in another USE
statement are to use this USE statement.
Usage Considerations:
• Restrictions
Control statements (ALTER (page 291), GO TO (page 334), and PERFORM (page 389))
specified in one logically discrete area are, with a few exceptions, not permitted to refer
◦
USE 485