例題
[P2118.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2118. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 GR1. 000007 02 E1 PIC X(5). 000008 01 GR2. 000009 02 E1 PIC X(5). 000010 66 R1 RENAMES E1 OF GR1. 000011 PROCEDURE DIVISION. 000012 END PROGRAM P2118.
P2118.cob 10: JMN2118I-S RENAMES句に指定されたデータ名，またはTHROUGHに指定されたデータ名は，直前のレコード記述項に定義されていなければなりません．
詳細な説明
RENAMES記述項は，再命名したい項目を含むレコード記述項の最後のデータ記述項の直後にまとめて書かなければなりません．
