例題
[P2316.cob] 000001 @OPTIONS CONF(74) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. P2316. 000004 ENVIRONMENT DIVISION. 000005 INPUT-OUTPUT SECTION. 000006 FILE-CONTROL. 000007 SELECT PRFILE1 ASSIGN TO GS-SYS001 000008 SYMBOLIC DESTINATION IS "DSP". 000009 DATA DIVISION. 000010 FILE SECTION. 000011 FD PRFILE1 000012 RECORD CONTAINS 80. 000013 01 PRF1REC. 000014 02 PIC X(80). 000015 PROCEDURE DIVISION. 000016 END PROGRAM P2316.
P2316.cob 12: JMN2316I-I (CONF)予約語TOを持たない整数指定のRECORD CONTAINS句は,表示ファイルに指定できません.問題があれば原始プログラムを修正してください.