例題
[P2000.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2000. 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 REPORT SECTION. 000012 RD REP1. 000013 PROCEDURE DIVISION. 000014 END PROGRAM P2000.
P2000.cob 12: JMN2000I-S 報告書記述項には,報告集団記述項が従属しなければなりません.報告書記述項は,無効になります.
詳細な説明
この診断メッセージが出力されるのは,報告書記述項(RD記述項)に続いて,報告書集団記述項が指定されていないことが原因です.
報告書集団記述項は,レベル01とTYPE句を持つデータ記述項で始まる一連のデータ記述項です.