例題
[C1148.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1148. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 INPUT-OUTPUT SECTION. 000006 FILE-CONTROL. 000007 SELECT INMSG 000008 ASSIGN TO INFILE. 000009 DATA DIVISION. 000010 FILE SECTION. 000011 FD INMSG. 000012 01 MSGFORM PIC X(50). 000013 PROCEDURE DIVISION. 000014 DECLARATIVES. 000015 IO-ERR SECTION. 000016 USE AFTER EXCEPTION PROCEDURE INMSG. 000017 END PROGRAM C1148.
C1148.cob 16: JMN1148I-S DECLARATIVESに対応するEND DECLARATIVESが指定されていません．END DECLARATIVESが指定されたものとみなします．
