例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2560.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT SQFILE1 ASSIGN TO SYS001.
000007 DATA DIVISION.
000008 FILE SECTION.
000009 FD SQFILE1.
000010 01 SQF1REC.
000011 02 PIC X(80).
000012 WORKING-STORAGE SECTION.
000013 01 WFS1 PIC X(2).
000014 PROCEDURE DIVISION.
000015 DECLARATIVES.
000016 E-PROC SECTION.
000017 END DECLARATIVES.
000018 END PROGRAM P2560.
P2560.cob (16) : JMN2560I-W 宣言部分中の節名の直後は,USE文でなければなりません.指定されたとおりに,受け入れます.
詳細な説明
宣言部分(DECLARATIVESで始まり,END DECLARATIVESで終わる記述)の節名の直後は,USE文を書かなければなりません.