例題
[C3276.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3276. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 AN-1 PIC X(6) VALUE "STRING". 000006 01 AN-2 PIC X(10) JUSTIFIED. 000007 PROCEDURE DIVISION. 000008 P-START. 000009 STRING AN-1 DELIMITED BY "I" INTO AN-2. 000010 STOP RUN.
C3276.cob 9: JMN3276I-W STRING文の受取り側項目は，JUSTIFIED句指定の項目であってはなりません．JUSTIFIED句指定なしの項目とみなされます．
