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

5.21.1.1 ISOD-LBO-CREATE_LBG

名前

　ISOD-LBO-CREATE_LBG

形式

REPOSITORY.
    CLASS      COSNAMING-NAMINGCONTEXT
    CLASS      CORBA-OBJECT
    CLASS      ISOD-LBG
    CLASS      ISOD-LBO-NOTFOUND
    CLASS      ISOD-LBO-CANNOTPROCEED
    CLASS      ISOD-LBO-INVALIDNAME
    CLASS      ISOD-LBO-ALREADYEXIST
    CLASS      ISOD-LBO-INVALIDTYPE
    CLASS      ISOD-LBO-BADOBJECT
    CLASS      ISOD-LBO-OPERATIONBUSY
    CLASS      CORBA-SYSTEMEXCEPTION

METHOD-ID.     CREATE_LBG.
DATA DIVISION.
LINKAGE SECTION.
01 NC                    OBJECT REFERENCE COSNAMING-NAMINGCONTEXT.
01 N                     TYPE COSNAMING-NAME.
01 LOADBALANCETYPE       TYPE CORBA-UNSIGNED-LONG.
01 DEFAULTOBJECTREF      OBJECT REFERENCE CORBA-OBJECT.
01 RESULT                OBJECT REFERENCE ISOD-LBG.
PROCEDURE DIVISION       USING     NC
                                   N
                                   LOADBALANCETYPE
                                   DEFAULTOBJECTREF
                         RETURNING RESULT
                         RAISING   CORBA-SYSTEMEXCEPTION
                                   ISOD-LBO-NOTFOUND
                                   ISOD-LBO-CANNOTPROCEED
                                   ISOD-LBO-INVALIDNAME
                                   ISOD-LBO-ALREADYEXIST
                                   ISOD-LBO-INVALIDTYPE
                                   ISOD-LBO-BADOBJECT
                                   ISOD-LBO-OPERATIONBUSY

機能説明

　本関数は、ロードバランスオブジェクトグループを作成し、ネーミングサービスに登録します。NCで指定されたネーミングコンテキスト配下にNで指定された名前で登録します。
　Nがコンパウンドネームである場合、バインディングはコンパウンドネーム中で最後に指定されたネーミングコンテキストに登録されます。

復帰値

　正常終了した場合は、生成したロードバランスオブジェクトグループのオブジェクトリファレンスが返されます。
　異常終了した場合は、以下の例外が発生します。

　ISOD-LBO-NOTFOUND

　Nで指定されたネーミングコンテキストが見つかりません。

　ISOD-LBO-CANNOTPROCEED

　NCで指定されたネーミングコンテキストが存在しません。

　ISOD-LBO-INVALIDNAME

　名前の指定に誤りがあります。

　ISOD-LBO-ALREADYEXIST

　指定された名前のバインディングがすでに存在します。

　ISOD-LBO-INVALIDTYPE

　ロードバランスタイプの指定に誤りがあります。

　ISOD-LBO-BADOBJECT

　DEFAULTOBJECTREFで指定されたオブジェクトが不当です。

　ISOD-LBO-OPERATIONBUSY

　同時処理可能な要求の上限に達しました。リトライしてください。

　CORBA-SYSTEMEXCEPTION

　その他の要因。

　システム例外発生時に設定された例外情報およびマイナーコードの意味については、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。