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が返されます。