ページの先頭行へ戻る
NetCOBOL V11.0 メッセージ集
FUJITSU Software

2.4.3 JMN2002I-S

REPORT句を持つファイル記述項に対して,レコード記述項は指定できません.次のファイル記述項または整列併合用ファイル記述項までのレコード記述項は無効になります.

例題

[P2002.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2002.
000003 ENVIRONMENT    DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT REPFILE ASSIGN TO SYS001.
000007 I-O-CONTROL.
000008 DATA           DIVISION.
000009 FILE            SECTION.
000010 FD REPFILE REPORT REP1.
000011 01 REPREC       PIC X(80).
000012 REPORT          SECTION.
000013 RD REP1.
000014 01 TYPE DE LINE PLUS 1.
000015   02 COLUMN 1   PIC X(10) VALUE SPACE.
000016 PROCEDURE      DIVISION.
000017 END PROGRAM    P2002.

P2002.cob 10: JMN2002I-S REPORT句を持つファイル記述項に対して,レコード記述項は指定できません.次のファイル記述項または整列併合用ファイル記述項までのレコード記述項は無効になります.

詳細な説明

この診断メッセージが出力されるのは,報告書ファイルのファイル記述項(FD記述項)に続いて,レコード記述項が指定されていることが原因です.REPORT句を指定したファイルは報告書ファイルとなります.