2.5.37 JMN5144I-S

@1@句に指定するデータ名はTYPE句の参照する型から展開された項目であってはなりません．
@1@句は無効になります．

引数の説明

@1@:

RENAMES

例

      000001 IDENTIFICATION  DIVISION.
      000002 PROGRAM-ID.     P5144.
      000003 DATA            DIVISION.
      000004 WORKING-STORAGE  SECTION.
      000005 01 BLOB TYPEDEF.
      000006   02 RESEV      PIC S9(9) BINARY.
      000007   02 LENG       PIC  9(9) BINARY.
      000008   02 BUFF       PIC X(1024).
      000009 01 GRP1  .
      000010   02 B1         TYPE BLOB.
      000011   66 C1 RENAMES LENG OF B1 THRU BUFF OF B1.
      000012 PROCEDURE       DIVISION.
      000013     STOP RUN.
      000014 END PROGRAM     P5144.

P5144.cob (11) : JMN5144I-S RENAMES句に指定するデータ名はTYPE句の参照する型から展開された項目であってはなりません．RENAMES句は無効になります．

詳細な説明

型(TYPEDEF)に含まれる名前に対して，その型をTYPE句で参照したのちに再命名することはできません．