例題
[P2024.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2024. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 WDA. 000007 02 WELM1 PIC 1(9) BIT. 000008 02 WELM2 PIC 1(7) BIT. 000009 02 WRLEM REDEFINES WELM2 000010 PIC X(3). 000011 PROCEDURE DIVISION. 000012 END PROGRAM P2024.
P2024.cob 9: JMN2024I-S REDEFINES句で再定義される項目がSYNCHRONIZED句のない内部ブール項目である場合，再定義する項目は，内部ブール項目でなければなりません．
