例題
[P2839.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2839. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT PRFILE1 ASSIGN TO SYS001. 000007 DATA DIVISION. 000008 FILE SECTION. 000009 FD PRFILE1 000010 CONTROL RECORD IS CTLREC. 000011 01 PRF1REC. 000012 02 PIC X(80). 000013 01 CTLREC PIC X(80). 000014 WORKING-STORAGE SECTION. 000015 01 WFMT PIC X(8). 000016 PROCEDURE DIVISION. 000017 END PROGRAM P2839.
P2839.cob 10: JMN2839I-S CONTROL RECORD句を指定するファイルは，表示ファイルまたはFORMAT句指定の印刷ファイルでなければなりません．
