NetCOBOL V11.1 メッセージ集

2.4.74 JMN2121I-S

RENAMES句に指定されたデータ名とTHROUGH指定のデータ名の間に，可変反復データ項目は指定できません．

例題

[P2121.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2121.
000003 ENVIRONMENT    DIVISION.
000004 DATA           DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 GR1.
000007   02 E1        PIC S9(4) BINARY.
000008   02 E2        OCCURS 10 DEPENDING ON E1.
000009     03         PIC X(2).
000010   02 E3        PIC X(2).
000011 66 R1 RENAMES E1 THRU E3.
000012 PROCEDURE      DIVISION.
000013 END PROGRAM    P2121.

P2121.cob 11: JMN2121I-S RENAMES句に指定されたデータ名とTHROUGH指定のデータ名の間に，可変反復データ項目は指定できません．