例題
[C1505.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1505. 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 01 A1 PIC X. 000012 01 A2 PIC X. 000013 01 A PIC 9. 000014 REPORT SECTION. 000015 RD RPT-F CONTROL IS A1 A2 A. 000016 01 HEAD01 TYPE IS RH. 000017 01 CONH01 TYPE IS CONTROL HEADING A1. 000018 02 DATA-1 PIC X SOURCE IS PAGE-COUNTER OF. 000019 01 CONF01 TYPE IS CONTROL FOOTING A2. 000020 01 FOOT01 TYPE IS RF. 000021 END PROGRAM C1505.
C1505.cob 18: JMN1505I-S SOURCE句で，PAGE-COUNTERまたはLINE-COUNTERの連結語OFまたはINの後は，報告書名でなければなりません．OFまたはINは無効になります．
