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

Table 81 Miscellaneous Control Directives (continued)
ActionDefaultDirective(s)
Specifies whether the compiler is to
apply the COBOL-1985 or
COBOL-2002 standard
STANDARD 1985STANDARD
Specifies that the program runs as a
process with the designated subtype
number
SUBTYPE
1
1
These directives are not available in the OSS environment.
2
The compiler ignores and issues warnings for these directives.
Table 82 ENDUNIT Directive
ActionDirective
Marks the end of the Procedure Division in a source file that contains multiple,
separately compiled COBOL programs.*
ENDUNIT
* This directive must be the last or the only directive on its line. If any other directive appears on the line after it, the
compiler reports an error and ignores the additional directives.
NOTE: In the list of directives, “Default:” identifies the default for the compiler directive itself, not
for its optional parameter(s). This default applies if a program does not contain the compiler
directive at all.
ANSI
ANSI
specifies that subsequent source text is in ANSI reference format, which is described in
Chapter 16: ANSI Reference Format (page 702).
TANDEM
specifies that subsequent source text is in Tandem reference format, which is described in
Reference Format for Source Program Lines (page 44).
TANDEMDefault:
AnywherePlacement:
ANSI or TANDEM within a section of text obtained from a copy library or source library
is effective only for the length of that text section. When the compiler reverts to the
Scope:
source file where it found the COPY verb or SOURCE directive, the previously active
reference format applies.
NoneDependencies:
TANDEMReferences:
BLANK and NOBLANK
Compiler Directives 539