名前
CORBA-ANY-EQUAL
形式
REPOSITORY.
    CLASS         CORBA-SYSTEMEXCEPTION
METHOD-ID.        EQUAL.
DATA DIVISION.
LINKAGE SECTION.
01 L-ANY        USAGE OBJECT REFERENCE CORBA-ANY.
01 RET          TYPE  CORBA-BOOLEAN.
PROCEDURE DIVISION  USING       L-ANY
                    RETURNING   RET
                    RAISING     CORBA-SYSTEMEXCEPTION機能説明
対象のAny型オブジェクトと、L-ANYで指定したAny型オブジェクトを比較し、結果を返します。
復帰値
正常終了した場合は、以下の値が返されます。
対象のAny型オブジェクトと指定したAny型オブジェクトは等しい(TypeCodeと値が等しい)。
対象のAny型オブジェクトと指定したAny型オブジェクトは等しくない。
異常終了した場合は、CORBA-SYSTEMEXCEPTION例外が発生します。
システム例外発生時に設定された例外情報およびマイナーコードの意味については、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。