NetCOBOL V11.0 メッセージ集

2.4.19 JMN2022I-S

REDEFINES句で再定義される項目は，@1@句を持つことはできません． REDEFINES句は無効になります．

埋め込みの説明

@1@ : OCCURSまたはTYPE．

例題

[C2022.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    C2022.
000003 DATA           DIVISION.
000004 WORKING-STORAGE SECTION.
000005 01 A.
000006   02 A1        OCCURS 10.
000007     03         PIC X(1).
000008   02 A2 REDEFINES A1.
000009     03         PIC N(5).
000010 PROCEDURE      DIVISION.
000011 END PROGRAM C2022.

C2022.cob 8: JMN2022I-S REDEFINES句で再定義される項目は，OCCURS句を持つことはできません．REDEFINES句は無効になります．