2.5.145 JMN5556I-S

INVOKE文の直後の一意名のメソッドの結果はオブジェクト一意名でなければなりません．
INVOKE文を無効とします．

例

      000001 IDENTIFICATION DIVISION.
      000002 CLASS-ID.      C5556.
      000003 IDENTIFICATION DIVISION.
      000004 OBJECT.
      000005 PROCEDURE      DIVISION.
      000006 IDENTIFICATION DIVISION.
      000007 METHOD-ID.     M5556A.
      000008 ENVIRONMENT    DIVISION.
      000009 DATA           DIVISION.
      000010 LINKAGE         SECTION.
      000011 01 LK1         OBJECT REFERENCE C5556.
      000012 PROCEDURE      DIVISION RETURNING LK1.
      000013 END METHOD     M5556A.
      000014 IDENTIFICATION DIVISION.
      000015 METHOD-ID.     M5556B.
      000016 ENVIRONMENT    DIVISION.
      000017 DATA           DIVISION.
      000018 LINKAGE         SECTION.
      000019 01 LK1         PIC X(10).
      000020 PROCEDURE      DIVISION RETURNING LK1.
      000021 END METHOD     M5556B.
      000022 END OBJECT.
      000023 END CLASS    C5556.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P5556.
      000003 ENVIRONMENT    DIVISION.
      000004 CONFIGURATION   SECTION.
      000005 REPOSITORY.
      000006     CLASS C5556.
      000007 DATA           DIVISION.
      000008 WORKING-STORAGE SECTION.
      000009 01 WOBR        OBJECT REFERENCE C5556.
      000010 PROCEDURE      DIVISION.
      000011*
      000012     INVOKE WOBR::"M5556A" "M5556B".
      000013*
      000014     INVOKE WOBR::"M5556B" "M5556A".
      000015 END PROGRAM      P5556.

P5556.cob (14) : JMN5556I-S INVOKE文の直後の一意名のメソッドの結果はオブジェクト一意名でなければなりません．INVOKE文を無効とします．

詳細な説明

INVOKE文の直後の一意名が，メソッドの行内呼出し，あるいはオブジェクトプロパティであり，かつ，その行内呼出しまたはオブジェクトプロパティの返却項目の属性がオブジェクトを識別するものではなかった場合に，この診断メッセージが出力されます．