2.4.41 JMN2065I-W

順ファイル以外に，LABEL RECORD句を指定する場合，OMITTEDは指定できません． LABEL RECORD句は，無効になります．

例題

[P2065.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2065.
000003 ENVIRONMENT    DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT IXFILE1 ASSIGN TO SYS001
000007       ORGANIZATION   IS INDEXED
000008       RECORD KEY     IS WRKY1.
000009 DATA           DIVISION.
000010 FILE            SECTION.
000011 FD IXFILE1
000012      LABEL RECORD OMITTED.
000013 01 IXF1REC.
000014   02 WRKY1     PIC X(2).
000015   02           PIC X(80).
000016 WORKING-STORAGE SECTION.
000017 PROCEDURE      DIVISION.
000018 END PROGRAM    P2065.

P2065.cob 12: JMN2065I-W 順ファイル以外に，LABEL RECORD句を指定する場合，OMITTEDは指定できません．LABEL RECORD句は，無効になります．

詳細な説明

LABEL RECORDS句は廃要素です．このコンパイラでは，LABEL RECORDS句は注釈とみなされます．