COBOL Manual for TNS and TNS/R Programs

Procedure Division Verbs
HP COBOL Manual for TNS and TNS/R Programs—522555-006
9-23
CALL
historical-on-phrase
excp-imperative-statement
is an imperative statement to be executed when an exception prevents calling
the specified program.
not-on-phrase
non-excp-imperative-statement
is an imperative statement to be executed when the specified program
completes its execution and returns control to the program that called it.
END-CALL
ends the scope of the CALL statement and makes it a delimited-scope statement.
If you omit END-CALL but include the EXCEPTION or NOT EXCEPTION phrase,
the CALL statement is a conditional statement and ends at the next period
separator.
Usage Considerations:
•
Currently Active Program
The currently active programThe currently active program, the one containing the
CALL statement, is the calling program; the program identified by program-name
or by the value of identifier is the called program.
Note. Although you can specify excp-imperative-statement in any CALL
statement, it only works when the called program is a COBOL program. For programs
written in languages other than COBOL, it is ignored.
excp-imperative-statement
EXCEPTION
ON OVERFLOW
VST135.vsd
non-excp-imperative-statement
EXCEPTION
ON
NOT
VST528.vsd