NetCOBOL V11.0 メッセージ集

2.6.132 JMN5572I-S

@1@に指定するオブジェクト一意名は特殊クラスを参照するものであってはなりません．

埋め込みの説明

@1@ : メソッドの行内呼び出しまたはプロパティ．

例題

[C5572.cob]
000001 IDENTIFICATION DIVISION.
000002 CLASS-ID.      C5572.
000003 ENVIRONMENT    DIVISION.
000004 CONFIGURATION   SECTION.
000005 REPOSITORY.
000006     CLASS COM AS "*COM".
000007 IDENTIFICATION DIVISION.
000008 OBJECT.
000009 DATA           DIVISION.
000010 PROCEDURE      DIVISION.
000011 IDENTIFICATION DIVISION.
000012 METHOD-ID.     M5572A.
000013 DATA           DIVISION.
000014 WORKING-STORAGE SECTION.
000015 01 WRST        PIC X(2).
000016 01 WCOM        OBJECT REFERENCE COM.
000017 PROCEDURE      DIVISION.
000018     MOVE  WCOM :: "M5572B" (WCOM) TO WRST.
000019 END METHOD     M5572A.
000020 IDENTIFICATION DIVISION.
000021 METHOD-ID.     M5572B.
000022 DATA           DIVISION.
000023 LINKAGE         SECTION.
000024 01 LK1         PIC X(2).
000025 PROCEDURE      DIVISION
000026                RETURNING LK1.
000027 END METHOD     M5572B.
000028 END OBJECT.
000029 END CLASS      C5572.

C5572.cob 18: JMN5572I-S メソッドの行内呼出しに指定するオブジェクト一意名は特殊クラスを参照するものであってはなりません．

詳細な説明

環境部のリポジトリ段落のクラス指定子の定数の値が以下のいずれかである場合，そのクラス名は特殊クラスのクラス名になります．

• "*COM" (または"*OLE")

• "*COM-ARRAY" (または"*OLE-ARRAY")

• "*COM-EXCEPTION" (または"*OLE-EXCEPTION")

• "*COB-BINDTABLE"

• "*COM:COMサーバ名:COMクラス名" (COMサーバ名=型ライブラリとの対応付けに使用する任意の名前, COMクラス名=dispinterface名またはcoclass名)