例題
[P2476.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2476. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT REPFILE ASSIGN TO SYS001. 000007 DATA DIVISION. 000008 FILE SECTION. 000009 FD REPFILE 000010 REPORT IS REP1. 000011 WORKING-STORAGE SECTION. 000012 01 WSO1 PIC X(10). 000013 01 WSO2 PIC X(10). 000014 REPORT SECTION. 000015 RD REP1 PAGE 66 000016 HEADING 2 000017 FIRST DETAIL 6. 000018 01 TYPE RH NEXT GROUP PLUS 1. 000019 02 . 000020 03 PIC X(10) SOURCE WSO1. 000021 PROCEDURE DIVISION. 000022 END PROGRAM P2476.
P2476.cob 18: JMN2476I-S NEXT GROUP句は,LINE NUMBER句の指定がない報告集団記述項に指定できません.そのまま処理を続行します.