例題
[C1358.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1358. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 A1 PIC X. 000006 01 B1 GLOBAL REDEFINES A1. 000007 END PROGRAM C1358.
C1358.cob 6: JMN1358I-W REDEFINES句は，データ記述項の最初の句でなければなりません．REDEFINES句は，有効になります．
