4.5.1 CORBA-NVLIST-ADD-ITEM

名前

CORBA-NVLIST-ADD-ITEM

形式

 ENVIRONMENT DIVISION.
   CONFIGURATION SECTION.
   SPECIAL-NAMES.
     SYMBOLIC CONSTANT
     COPY SYMBOL-CONST IN CORBA.
     .
 DATA DIVISION.
  WORKING-STORAGE SECTION.
    COPY CONST IN CORBA.
    01 COPY NVLIST IN CORBA REPLACING CORBA-NVLIST BY N-LIST.
    01 ITEM-NAME USAGE POINTER.
    01 COPY TYPECODE IN CORBA REPLACING CORBA-TYPECODE BY ITEM-TYPE.
    01 N-VALUE USAGE POINTER.
    01 COPY LONG IN CORBA REPLACING CORBA-LONG BY VALUE-LEN.
    01 COPY FLAGS IN CORBA REPLACING CORBA-FLAGS BY ITEM-FLAGS.
    01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
    01 COPY STATUS IN CORBA REPLACING CORBA-STATUS BY ORB-STATUS.

 PROCEDURE DIVISION.
    CALL "CORBA-NVLIST-ADD-ITEM" USING
        N-LIST
        ITEM-NAME
        ITEM-TYPE
        N-VALUE
        VALUE-LEN
        ITEM-FLAGS
        ENV
        ORB-STATUS.

機能説明

CORBA-ORB-CREATE-LIST関数で獲得したN-LISTで指定されたリストオブジェクトに呼び出すサーバアプリケーションのパラメタ情報を追加します。ITEM-NAMEにはパラメタの名前、ITEM-TYPEにはパラメタの属性、N-VALUEにはパラメタの値、VALUE-LENにはパラメタの長さを指定します。ITEM-FLAGSには以下の値を指定します。

CORBA-ARG-IN: 入力だけのパラメタ。

CORBA-ARG-OUT: 出力だけのパラメタ。

CORBA-ARG-INOUT: 入出力パラメタ。

CORBA-IN-COPY-VALUE: 値はコピーされ、コピーした値が使われます。

DEPENDENT-LIST: 親リストが解放されたときにサブリストも解放されます。

パラメタは以前に追加されたパラメタの後に追加されます。

復帰値

正常終了した場合は、CORBA-OKが返されます。
異常終了した場合は、CORBA-FAILEDが返されます。

備考

クライアントでITEM-FLAGSにCORBA-ARG-OUTを指定する場合、N-VALUEにはNULLを設定してください。