例題
[C1303.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1303. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 MOJI PIC X(5) VALUE "ABCDE". 000006 01 REMOJI REDEFINES MOJI EXTERNAL. 000007 02 DATA1 PIC X. 000008 END PROGRAM C1303.
C1303.cob 6: JMN1303I-S EXTERNAL句とREDEFINES句は，同じデータ項目に指定できません．REDEFINES句が無効になります．
