埋め込みの説明
@1@ : RENAMES,VALUE,BASED ON,LENGTH,RECORDまたはCHARACTER TYPE.
@2@ : エラーの原因となったデータ名.
例題
[P2213.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2213. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 GR1. 000007 02 E1 PIC X(5). 000008 02 E1 PIC N(5). 000009 66 R1 RENAMES E1 THRU E1. 000010 PROCEDURE DIVISION. 000011 END PROGRAM P2213.
P2213.cob 9: JMN2213I-S RENAMES句のデータ名'E1'が多重定義です.RENAMES句は無効になります.