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

and then describes each nonconforming element.
Each reported instance of nonconformance or obsolescence identifies the context of the syntax,
describes its location in the source text, and characterizes the syntax as “obsolete” or
“nonconforming.” If an instance is both obsolete and nonconforming, only “obsolete” is
reported. A message has either of these forms:
context on line nnnnn at
column xx contains obsolete syntax
Syntax on line nnnnn at column xx is defined in level
or
context on line nnnnn at
column xx contains nonconforming syntax
Syntax on line nnnnn at column xx is defined in level
context
is a header (such as “Data Division header”), statement (such as “ADD statement”), clause
(such as “LINAGE clause”), or the general phrase “Source text.”
nnnnn
is a five-digit line number.
xx
is a two-digit column number.
level
is HIGH, EXTENDED, DEB1, SEG1, or SEG2, as appropriate.
Syntax on line nnnnn at column xx is defined in level
includes the location phrases only if they differ from the information in the first line.
The messages generated in accordance with the SUBSET directive are issued as a block after each
separately compiled program.
Use the directive ...To report ...
SUBSET EXTENDED, DEB1, SEG2Obsolete syntax
SUBSET HIGH, DEB1, SEG2, OBSOLETESyntax unlikely to be portable
SUBTYPE
NOTE: Do not use this directive in the OSS environment.
SUBTYPE causes the main program created by the current compilation to execute as a process of
a specified subtype.
subtype-number
is an integer in the range 0 through 63.
You can define the meaning and behavior of process subtypes 48 through 63.
HP defines the meaning and behavior of process subtypes 1 through 47 (see the Guardian
Programmer’s Guide).
SUBTYPE 0Default:
AnywherePlacement:
The last SUBTYPE in the program applies.Scope:
576 Program Compilation