Interstage Application Server リファレンスマニュアル（API編）

5.10.1 CORBA-TYPECODE-EQUAL

名前

　CORBA-TYPECODE-EQUAL

形式

REPOSITORY.
    CLASS         CORBA-SYSTEMEXCEPTION

METHOD-ID.        EQUAL.
DATA DIVISION.
LINKAGE SECTION.
01 TC                  USAGE OBJECT REFERENCE CORBA-TYPECODE.
01 RET                 TYPE  CORBA-BOOLEAN.
PROCEDURE DIVISION     USING          TC
                       RETURNING      RET
                       RAISING        CORBA-SYSTEMEXCEPTION

機能説明

　TypeCodeオブジェクトとTCで指定したTypeCodeオブジェクトとを比較します。

復帰値

　TypeCodeが一致した場合は、CORBA-TRUEが返されます。
　一致しなかった場合は、CORBA-FALSEが返されます。