例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2475.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT SQFILE1 ASSIGN TO SYS001.
000007 I-O-CONTROL.
000008 DATA DIVISION.
000009 FILE SECTION.
000010 FD SQFILE1
000011 REPORT IS REP1.
000012 WORKING-STORAGE SECTION.
000013 01 WITM1 PIC 9(2).
000014 01 WITM2 PIC 9(2).
000015 REPORT SECTION.
000016 RD REP1 PAGE 66
000017 CONTROL WITM1 WITM2.
000018 01 .
000019 02 PIC S9(4).
000020 PROCEDURE DIVISION.
000021 END PROGRAM P2475.
P2475.cob (18) : JMN2475I-S 報告集団記述項のレベル番号01の項目にTYPE句が指定されていません.この報告集団記述項は,無効になります.
詳細な説明
報告集団記述項の最初の項目は,TYPE句を指定したレベル番号01の項目でなければなりません.TYPE句は,報告集団の種類と表示すべき時点を指定します.