| Interstage Application Server リファレンスマニュアル(API編) |
目次
索引
![]()
|
| 第4章 COBOLインタフェース | > 4.8 ServerRequestインタフェース |
CORBA-SERVERREQUEST-PARAMS
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
WORKING-STORAGE SECTION.
COPY CONST IN CORBA.
01 COPY SERVERREQUEST IN CORBA REPLACING CORBA-REQUEST BY DSI-REQUEST.
01 COPY NVLIST IN CORBA REPLACING CORBA-NVLIST BY ARG-LIST.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
PROCEDURE DIVISION.
CALL "CORBA-SERVERREQUEST-PARAMS" USING
DSI-REQUEST
ARG-LIST
ENV.
DSI-REQUESTで指定したServerRequestオブジェクトからパラメタ情報を取り出し、ARG-LISTで指定したNVListオブジェクトに設定します。DSI-REQUESTにはDSI処理関数の第1パラメタとして通知されるオブジェクトリファレンスを指定します。ARG-LISTにはCORBA-ORB-CREATE関数で生成したオブジェクトリファレンスを指定し、かつパラメタの個数分CORBA-NVLIST-ADD-ITEM関数でパラメタ情報設定域を確保する必要があります。
正常終了した場合は、ARG-LISTで指定したNVListオブジェクトにパラメタ情報が設定され、ENV構造体のMAJORにはCORBA-NO-EXCEPTIONが設定されます。
異常終了した場合は、ENV構造体のMAJORにはCORBA-SYSTEM-EXCEPTIONが設定され、IDとMINORに詳細情報が設定されます。
IDとMINORの意味については、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。
DSI-REQUESTにNULLが指定された場合、ENV構造体のMAJORにはCORBA-USER-EXCEPTIONが設定されます。
目次
索引
![]()
|