ILE COBOL Programmer's Guide

Compiler-Directing Statements

Compiler-Directing Statements

COPY Statement

Comment after Variable Length Field

In OPM COBOL/400, a DDS source with data type G and VARLEN will produce the following:

06    FILLER      PIC X(10)
      (Variable length field)

ILE COBOL adds a comment after the variable length field comment, which is more accurate:

06    FILLER      PIC X(10)
      (Variable length field)
      (Graphic field)

Default Source File Name

In ILE COBOL, if a source file member is being compiled, the default source file name is QCBLLESRC. If a stream file is being compiled, the stream file must be specified. In ILE COBOL, if a source file member is being compiled, a COPY statement without the source qualifier will use QCBLLESRC. If the default file name is used and the source member is not found in file QCBLLESRC then file QLBLSRC will also be checked. If a stream file is being compiled, the compiler follows a different search order to resolve copy books. See the ILE COBOL Reference for details.

In OPM COBOL/400 the default source file name is QLBLSRC.

PROCESS Statement

PROCESS Statement

*CBL/*CONTROL Statement

If *CONTROL is encountered on the PROCESS statement, then it is not handled as a directive but as an invalid PROCESS option. The *CBL/*CONTROL directive should be the only statement on a given line.

INTERMEDIATE and MINIMUM Options (FIPS Flagging)

In ILE COBOL, if FIPS flagging is not requested on the CRTCBLMOD or CRTBNDCBL commands, and there is a COPY statement within the PROCESS statement, no FIPS flagging will be performed against the copy member when INTERMEDIATE or MINIMUM is specified after the COPY statement. However, if INTERMEDIATE or MINIMUM is specified before the COPY statement, then FIPS flagging will be performed against the copy member.

In OPM COBOL/400, regardless of whether or not INTERMEDIATE or MINIMUM is specified before or after the COPY STATEMENT, FIPS flagging is performed against the copy member.

NOSOURCE Option

In OPM COBOL/400, when the NOSOURCE option is specified on the PROCESS statement, the Options in Effect values are printed on the compiler listing.

In ILE COBOL, when the NOSOURCE option is specified on the PROCESS statement, the Options in Effect values are not printed on the compiler listing.

USE FOR DEBUGGING

OPM COBOL/400 accepts USE FOR DEBUGGING when WITH DEBUGGING MODE is specified.

ILE COBOL does not support USE FOR DEBUGGING. Text is treated as comments until the start of the next section or the end of the DECLARATIVES. A severity 0 error message and a severity 20 error message are issued.


[ Top of Page | Previous Page | Next Page | Table of Contents | Index ]