NetCOBOL V11.1 メッセージ集

2.4.72 JMN2119I-S

RENAMES句のデータ名またはTHROUGHのデータ名は，OCCURS句を含む項目またはOCCURS句を含む項目に従属する項目であってはなりません．

例題

[P2119.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2119.
000003 ENVIRONMENT    DIVISION.
000004 DATA           DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 GR1.
000007   02 OCC1      OCCURS 10.
000008     03 E1      PIC X(2).
000009 66 R1 RENAMES OCC1.
000010 PROCEDURE      DIVISION.
000011 END PROGRAM    P2119.

P2119.cob 9: JMN2119I-S RENAMES句のデータ名またはTHROUGHのデータ名は，OCCURS句を含む項目またはOCCURS句を含む項目に従属する項目であってはなりません．