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

SUPPRESS overrides LIST (and therefore, it also overrides CODE, CROSSREF, ICODE,
LMAP, MAP, SHOWCOPY, and SQL).
Dependencies:
References:
• LIST and NOLIST
• MAP and NOMAP
• SHOWCOPY and NOSHOWCOPY
• SQL and NOSQL
SYMBOLS and NOSYMBOLS
NOSYMBOLSDefault:
Accepted anywhere, but to affect a program other than the first program in a compilation
unit, SYMBOLS must follow either an ENDUNIT directive or an END PROGRAM
statement, which signals the end of the preceding program’s Procedure Division.
Placement:
If you want a symbol table for a given separately compiled program, put SYMBOLS
before its Identification Division header. If the compiler encounters a subsequent
SYMBOLS or NOSYMBOLS directive within the text of that separately compiled program,
it issues a warning and ignores that directive.
Applies until its opposite overrides itScope:
SYMBOLS does not work when SYNTAX is active.For SYMBOLS to affect a program
other than the first program in a compilation unit, it must be preceded by either an
Dependencies:
ENDUNIT directive or an END PROGRAM statement, which signals the end of the
preceding program’s Procedure Division.
References:
• ENDUNIT
• SYNTAX
SYNTAX
COMPILEDefault:
Outside the boundaries of a separately compiled program; that is, not between the
Identification Division header of a separately compiled program and its end, which
is marked by one of:
Placement:
• The corresponding END PROGRAM statement
• ENDUNIT
• The end of the source file
The last COMPILE or SYNTAX in the compilation unit applies to the entire compilation
unit.
Scope:
1000 Compiler Directives