COBOL Manual for TNS/E Programs (H06.08+, J06.03+)
Dependencies:
• If RUNNABLE is active, CALL-SHARED uses the linker to create a PIC executable
object file; otherwise, CALL-SHARED creates a PIC linkfile.
• Do not use with UL.
References:
• SHARED (page 568)
• RUNNABLE
• UL
CANCEL and NOCANCEL
CANCEL
generates code that initializes the program the first time the program is called after being
canceled by a CANCEL statement.
NOCANCEL
prevents the generation of code that initializes the program the first time the program is called
after being canceled by a CANCEL statement.
CANCELDefault:
AnywherePlacement:
Applies to the program that contains it. CANCEL and NOCANCEL do not apply to
initial programs, which are initialized every time they are called.
Scope:
NoneDependencies:
If a program is not an initial program and is never referenced by a CANCEL statement, specify
NOCANCEL to reduce the size of the program’s object code. Do not specify NOCANCEL for a
program that is referenced by a CANCEL statement. If you do, the program might not execute in
the manner expected.
CHECK
CHECK controls the level of run-time checking that a program performs.
check-level
is an integer in the range 0 through 15. For the meanings of the different values of
check-level, see Table 83.
CHECK 1Default:
AnywherePlacement:
In each separately compiled program, the last CHECK in the program unit determines
the check level for the code block being produced.
Scope:
NoneDependencies:
Compiler Directives 541










