| Interstage Application Server リファレンスマニュアル(API編) |
目次
索引
![]()
|
| 第4章 COBOLインタフェース | > 4.2 ORBインタフェース |
CORBA-ORB-BOA-INIT
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
ARGUMENT-NUMBER IS ARG-C
ARGUMENT-VALUE IS ARG-V.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
WORKING-STORAGE SECTION.
COPY CONST IN CORBA.
01 COPY ORB IN CORBA REPLACING CORBA-ORB BY ORB.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
01 BOA-IDENTIFIER USAGE POINTER.
01 COPY BOA IN CORBA REPLACING CORBA-BOA BY BOA.
PROCEDURE DIVISION.
CALL "CORBA-ORB-BOA-INIT" USING
ORB
ARG-C
ARG-V
BOA-IDENTIFIER
ENV
BOA.
サーバアプリケーションを制御するBOA(Basic Object Adapter)を初期化し、BOAのオブジェクトリファレンスを返します。ORBには、CORBA-ORB-INIT関数で返されるORBのオブジェクトリファレンスを指定します。ARG-CおよびARG-Vには、プログラム起動時のパラメタであり、主入り口点に渡されます。
BOA-IDENTIFIERは、CORBA-STRING-SET関数でCORBA-BOA-OA-IDを指定します。
正常終了した場合は、BOAのオブジェクトリファレンスが返され、ENV構造体のMAJORにはCORBA-NO-EXCEPTIONが設定されます。
異常終了した場合は、ENV構造体のMAJORにはCORBA-SYSTEM-EXCEPTIONが設定され、IDとMINORに詳細情報が設定されます。
IDとMINORの意味については、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。
ORBにNULLが指定された場合、ENV構造体のMAJORにはCORBA-USER-EXCEPTIONが設定されます。
目次
索引
![]()
|