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

EXTENDED
accepts all defined syntax without comment (HP extensions plus those of HIGH), with
respect to the required functional modules.
DEB1
accepts all syntax defined in level 1 of the Debug module without comment.
If DEB1 is not specified, the compiler reports syntax defined in level 1 of the Debug
functional module (DEB 1).
Syntax defined in level 2 of the Debug module causes the compiler to report an error,
because HP COBOL does not support level 2 of this module.
SEG1
accepts all syntax defined in level 1 of the Segmentation module (SEG 1) without
comment, but reports syntax defined in level 2 (SEG 2).
If SEG1 is not specified, the compiler reports syntax defined in the Segmentation
functional module.
Although HP COBOL does not support the Segmentation functional module, syntax that
has no semantic effect is not diagnosed. This behavior simplifies the conversion of
existing programs to HP COBOL.
SEG2
accepts all syntax defined in the Segmentation module without comment.
If SEG2 is not specified, the compiler reports syntax defined in level 2 of the
Segmentation functional module.
OBSOLETE
accepts all obsolete syntax without comment unless it fails to conform to the specified
subset; in that case, the compiler reports nonconformance rather than obsolescence.
If OBSOLETE is not specified, the compiler reports syntax classified as obsolete,
regardless of whether it conforms to the specified subset in other respects.
The specified parameters can appear in any order. If two or more parameters are mutually
incompatible, the last one overrides the others (redundancy is permitted). If neither HIGH
nor EXTENDED is specified, EXTENDED is assumed by default.
NoneDefault:
Must appear before the first COBOL source program (that is, before the first
Identification Division header).
Placement:
The last valid SUBSET in the program applies.Scope:
SUBSET is incompatible with the STANDARD 2002 directiveDependencies:
Usage Considerations:
• Invalid SUBSET Directives
If a SUBSET directive appears in an invalid context, the compiler issues an appropriate message
and, after analyzing the directive, ignores it and cancels the effect of any previously accepted
SUBSET directive (since an error has occurred).
Upon the occurrence of any error, the compiler cancels any active SUBSET directive and
discards any messages not yet issued.
• Messages
After the compiler has processed a separately compiled program that contains unauthorized
syntax (but no actual errors), it displays the message
*** The preceding program does not conform to the specified subset ***
Compiler Directives 575