例題
[P2458.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2458. 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 000011 REPORT IS REP1. 000012 WORKING-STORAGE SECTION. 000013 01 CTLD PIC X(1). 000014 REPORT SECTION. 000015 RD REP1 PAGE 66 000016 CONTROL FINAL CTLD. 000017 01 TYPE CF CTLD. 000018 01 TYPE CF CTLD. 000019 PROCEDURE DIVISION. 000020 END PROGRAM P2458.
P2458.cob 18: JMN2458I-S 同一制御レベルの制御頭書き報告集団または制御脚書き報告集団は複数指定できません．
