COBOL Manual for TNS and TNS/R Programs

Compiler Directives

HP COBOL Manual for TNS and TNS/R Programs—522555-006

36-19

IF and IFNOT

INNERLIST and NOINNERLIST

Default: None

Placement: IF must be either on a directive line of its own or be the last of a

sequence of directives.

IFNOT can be anywhere.

Scope: IF or IFNOT applies until matching ENDIF appears.

Dependencies: Requires a preceding IF or IFNOT directive with the same toggle-

number

References: IF and IFNOT

Note. The COBOL85 compiler does not recognize these directives. For the COBOL85

compiler, use ICODE and NOICODE

instead.

Default: NOINNERLIST

Placement: Anywhere

Scope: Applies until its opposite overrides it

Dependencies: INNERLIST works only if LIST is active and SUPPRESS is not.

References:

•

LIST and NOLIST

•

SUPPRESS and NOSUPPRESS

IFNOT

toggle-number

VST287.vsd

INNERLIST

NOINNERLIST

VST724.vsd