例題
[C1531.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1531. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT IN-F ASSIGN INFILE. 000007 DATA DIVISION. 000008 FILE SECTION. 000009 FD IN-F REPORT RPT-F. 000010 WORKING-STORAGE SECTION. 000011 REPORT SECTION. 000012 RD RPT-F. 000013 01 HEAD01 TYPE IS RH. 000014 02 LINE NUMBER IS PLUS 1. 000015 03 PIC 9(4) COLUMN NUMBER IS 1 VALUE 1. 000016 04 PIC X(5) COLUMN NUMBER IS 8 VALUE "A". 000017 01 FOOT01 TYPE IS RF. 000018 END PROGRAM C1531.
C1531.cob 16: JMN1531I-S 報告集団記述項のレベル番号は，3階層の範囲でなければなりません．正しいレベルの階層とみなします．
