例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1020. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 CHRLIT PIC X(10) VALUE 000006 "ABCDEFGHIJ". 000007 END PROGRAM C1020.
C1020.cob (6) : JMN1020I-W 定数はB領域から書き始めなければなりません.B領域から書き始められているものとみなします.