名前
COSNAMING-NAMINGCONTEXT-BIND
形式
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
COPY CONST IN CORBA.
01 COPY COSNAMING-NAMINGCONTEXT IN CORBA REPLACING COSNAMING-
NAMINGCONTEXT BY NC.
01 COPY COSNAMING-NAME IN CORBA REPLACING COSNAMING-NAME BY N.
01 COPY OBJECT IN CORBA REPLACING CORBA-OBJECT BY OBJ.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
PROCEDURE DIVISION.
CALL "COSNAMING-NAMINGCONTEXT-BIND" USING
NC
N
OBJ
ENV.機能説明
Nで指定された名前とOBJで指定されたオブジェクトリファレンスのバインディングを作成し、NCで指定されたネーミングコンテキストに登録します。
NCはネーミングコンテキストのオブジェクトリファレンスです。
Nがコンパウンドネームである場合、バインディングはコンパウンドネーム中で最後に指定されたネーミングコンテキストに登録されます。
復帰値
正常終了した場合は、ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定されます。
異常終了した場合は、ENV構造体のMAJORにCORBA-SYSTEM-EXCEPTIONまたはCORBA-USER-EXCEPTIONが設定され、ENV構造体のIDに詳細情報が設定されます。
ユーザ例外の場合は、以下の詳細情報が設定されます。
Nで指定されたネーングコンテキストが見つかりません。
NCで指定されたネーミングコンテキストが存在しません。
名前の指定に誤りがあります。
指定された名前のバインディングがすでに存在します。
システム例外の場合は、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。
名前
COSNAMING-NAMINGCONTEXT-REBIND
形式
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
COPY CONST IN CORBA.
01 COPY COSNAMING-NAMINGCONTEXT IN CORBA REPLACING COSNAMING-NAMINGCONTEXT BY NC.
01 COPY COSNAMING-NAME IN CORBA REPLACING COSNAMING-NAME BY N.
01 COPY OBJECT IN CORBA REPLACING CORBA-OBJECT BY OBJ.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
PROCEDURE DIVISION.
CALL "COSNAMING-NAMINGCONTEXT-REBIND" USING
NC
N
OBJ
ENV.機能説明
Nで指定された名前とOBJで指定されたオブジェクトリファレンスのバインディングを作成し、NCで指定されたネーミングコンテキストに登録します。指定された名前のバインディングがすでに存在してもエラーとはなりません。
Nがコンパウンドネームである場合、バインディングはコンパウンドネーム中で最後に指定されたネーミングコンテキストに登録されます。
復帰値
正常終了した場合は、ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定されます。
異常終了した場合は、ENV構造体のMAJORにCORBA-SYSTEM-EXCEPTIONまたはCORBA-USER-EXCEPTIONが設定され、ENV構造体のIDに詳細情報が設定されます。
ユーザ例外の場合は、以下の詳細情報が設定されます。
Nに指定されたネーミングコンテキストが見つかりません。
NCで指定されたネーミングコンテキストが存在しません。
名前の指定に誤りがあります。
システム例外の場合は、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。
名前
COSNAMING-NAMINGCONTEXT-BIND-CONTEXT
形式
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
COPY CONST IN CORBA.
01 COPY COSNAMING-NAMINGCONTEXT IN CORBA REPLACING COSNAMING-NAMINGCONTEXT BY NC1.
01 COPY COSNAMING-NAME IN CORBA REPLACING COSNAMING-NAME BY N.
01 COPY COSNAMING-NAMINGCONTEXT IN CORBA REPLACING COSNAMING-NAMINGCONTEXT BY NC2.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
PROCEDURE DIVISION.
CALL "COSNAMING-NAMINGCONTEXT-BIND-CONTEXT" USING
NC1
N
NC2
ENV.機能説明
Nで指定された名前とNC2で指定されたネーミングコンテキストのオブジェクトリファレンスのバインディングを作成し、NC1で指定されたネーミングコンテキストに登録します。NC1はネーミングコンテキストのオブジェクトリファレンスです。
Nがコンパウンドネームである場合、バインディングはコンパウンドネーム中で最後に指定されたネーミングコンテキストに登録されます。
復帰値
正常終了した場合は、ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定されます。
異常終了した場合は、ENV構造体のMAJORにCORBA-SYSTEM-EXCEPTIONまたはCORBA-USER-EXCEPTIONが設定され、ENV構造体のIDに詳細情報が設定されます。
ユーザ例外の場合は、以下の詳細情報が設定されます。
Nで指定されたネーミングコンテキストが見つかりません。
NCで指定されたネーミングコンテキストが存在しません。
名前の指定に誤りがあります。
指定された名前のバインディングがすでに存在します。
システム例外の場合は、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。
注意事項
NC2には、登録先のネーミングサービスのオブジェクトリファレンス、および登録先のネーミングサービスにすでに登録されているネーミングコンテキストのオブジェクトリファレンスを指定しないでください。
名前
COSNAMING-NAMINGCONTEXT-REBIND-CONTEXT
形式
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
COPY CONST IN CORBA.
01 COPY COSNAMING-NAMINGCONTEXT IN CORBA REPLACING COSNAMING-
NAMINGCONTEXT BY NC1.
01 COPY COSNAMING-NAME IN CORBA REPLACING COSNAMING-NAME BY N.
01 COPY COSNAMING-NAMINGCONTEXT IN CORBA REPLACING COSNAMING-
NAMINGCONTEXT BY NC2.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
PROCEDURE DIVISION.
CALL "COSNAMING-NAMINGCONTEXT-REBIND-CONTEXT" USING
NC1
N
NC2
ENV.機能説明
Nで指定された名前とNC2で指定されたネーミングコンテキストのオブジェクトリファレンスのバインディングを作成し、NC1で指定されたネーミングコンテキストに登録します。指定された名前のバインディングがすでに存在してもエラーにはなりません。
Nがコンパウンドネームである場合、バインディングはコンパウンドネーム中で最後に指定されたネーミングコンテキストに登録されます。
復帰値
正常終了した場合は、ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定されます。
異常終了した場合は、ENV構造体のMAJORにCORBA-SYSTEM-EXCEPTIONまたはCORBA-USER-EXCEPTIONが設定され、ENV構造体のIDに詳細情報が設定されます。
ユーザ例外の場合は、以下の詳細情報が設定されます。
Nに指定されたネーミングコンテキストが見つかりません。
NCで指定されたネーミングコンテキストが存在しません。
名前の指定に誤りがあります。
システム例外の場合は、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。
注意事項
NC2には、登録先のネーミングサービスのオブジェクトリファレンス、および登録先のネーミングサービスにすでに登録されているネーミングコンテキストのオブジェクトリファレンスを指定しないでください。
名前
COSNAMING-NAMINGCONTEXT-RESOLVE
形式
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
COPY CONST IN CORBA.
01 COPY COSNAMING-NAMINGCONTEXT IN CORBA REPLACING COSNAMING-
NAMINGCONTEXT BY NC.
01 COPY COSNAMING-NAME IN CORBA REPLACING COSNAMING-NAME BY N.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
01 COPY OBJECT IN CORBA REPLACING CORBA-OBJECT BY OBJ.
PROCEDURE DIVISION.
CALL "COSNAMING-NAMINGCONTEXT-RESOLVE" USING
NC
N
ENV
OBJ.機能説明
NCで指定されたネーミングコンテキスト中で、Nに指定された名前と結合されているオブジェクトリファレンスを返します。
本関数はオブジェクトリファレンスを格納する領域を獲得するため、この領域が不要になった時点で、CORBA-OBJECT-RELEASE関数を使用して領域を解放する必要があります。
復帰値
正常終了した場合は、オブジェクトリファレンスが返され、ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定されます。
異常終了した場合は、ENV構造体のMAJORにCORBA-SYSTEM-EXCEPTIONまたはCORBA-USER-EXCEPTIONが設定され、ENV構造体のIDに詳細情報が設定されます。
ユーザ例外の場合は、以下の詳細情報が設定されます。
Nで指定された名前が見つかりません。
NCで指定されたネーミングコンテキストが存在しません。
名前の指定に誤りがあります。
システム例外の場合は、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。
名前
COSNAMING-NAMINGCONTEXT-UNBIND
形式
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
COPY CONST IN CORBA.
01 COPY COSNAMING-NAMINGCONTEXT IN CORBA REPLACING COSNAMING-NAMINGCONTEXT BY NC.
01 COPY COSNAMING-NAME IN CORBA REPLACING COSNAMING-NAME BY N.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
PROCEDURE DIVISION.
CALL "COSNAMING-NAMINGCONTEXT-UNBIND" USING
NC
N
ENV.機能説明
NCで指定されたネーミングコンテキストから、Nで指定された名前のバイン ディングを削除します。
復帰値
正常終了した場合は、ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定されます。
異常終了した場合は、ENV構造体のMAJORにCORBA-SYSTEM-EXCEPTIONまたはCORBA-USER-EXCEPTIONが設定され、ENV構造体のIDに詳細情報が設定されます。
ユーザ例外の場合は、以下の詳細情報が設定されます。
Nで指定された名前が見つかりません。
NCで指定されたネーミングコンテキストが存在しません。
名前の指定に誤りがあります。
システム例外の場合は、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。
名前
COSNAMING-NAMINGCONTEXT-NEW-CONTEXT
形式
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
COPY CONST IN CORBA.
01 COPY COSNAMING-NAMINGCONTEXT IN CORBA REPLACING COSNAMING-
NAMINGCONTEXT BY NC.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
01 COPY COSNAMING-NAMINGCONTEXT IN CORBA REPLACING COSNAMING-
NAMINGCONTEXT BY NC-RET.
PROCEDURE DIVISION.
CALL "COSNAMING-NAMINGCONTEXT-NEW-CONTEXT" USING
NC
ENV
NC-RET.機能説明
NCで指定されたネーミングコンテキストを管理するネーミングサーバ内に新しいネーミングコンテキストを作成し、作成されたネーミングコンテキストのオブジェクトリファレンスを返します。
本関数はオブジェクトリファレンスを格納する領域を獲得するため、この領域が不要になった時点で、CORBA-OBJECT-RELEASE関数を使用して領域を解放する必要があります。
復帰値
正常終了した場合は、ネーミングコンテキストのオブジェクトリファレンスが返され、ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定されます。
異常終了した場合は、ENV構造体のMAJORにCORBA-SYSTEM-EXCEPTIONが設定され、IDとMINORに詳細情報が設定されます。IDとMINORの意味については、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。
注意事項
ネーミングコンテキストの作成、登録には、COSNAMING-NAMINGCONTEXT-BIND-NEW-CONTEXTを使用することを推奨します。
本メソッドを呼び出して作成したネーミングコンテキストは、必ずCOSNAMING-NAMINGCONTEXT-BIND-CONTEXTを発行してバインディングを作成／登録してください。
名前
COSNAMING-NAMINGCONTEXT-BIND-NEW-CONTEXT
形式
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
COPY CONST IN CORBA.
01 COPY COSNAMING-NAMINGCONTEXT IN CORBA REPLACING COSNAMING-
NAMINGCONTEXT BY NC.
01 COPY COSNAMING-NAME IN CORBA REPLACING COSNAMING-NAME BY N.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
01 COPY COSNAMING-NAMINGCONTEXT IN CORBA REPLACING COSNAMING-
NAMINGCONTEXT BY NC-RET.
PROCEDURE DIVISION.
CALL "COSNAMING-NAMINGCONTEXT-BIND-NEW-CONTEXT" USING
NC
N
ENV
NC-RET.機能説明
新しいネーミングコンテキストを作成し、そのオブジェクトリファレンスとNで指定された名前のバインディングを作成して、既存のネーミングコンテキストに登録します。呼び出し元には、新しいネーミングコンテキストのオブジェクトリファレンスを返します。
Nがコンパウンドネームである場合、バインディングはコンパウンドネーム中で最後に指定されたネーミングコンテキストに登録されます。また、新しいネーミングコンテキストは、名前の登録が行われたネーミングコンテキストを管理するネーミングサーバ内に作成されます。
本関数はオブジェクトリファレンスを格納する領域を獲得するため、この領域が不要になった時点で、CORBA-OBJECT-RELEASE関数を使用して領域を解放する必要があります。
復帰値
正常終了した場合は、ネーミングコンテキストのオブジェクトリファレンスが返され、ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定されます。
異常終了した場合は、ENV構造体のMAJORにCORBA-SYSTEM-EXCEPTIONまたはCORBA-USER-EXCEPTIONが設定され、ENV構造体のIDに詳細情報が設定されます。
ユーザ例外の場合は、以下の詳細情報が設定されます。
Nに指定されたネーミングコンテキストが見つかりません。
NCで指定されたネーミングコンテキストが存在しません。
名前の指定に誤りがあります。
指定された名前のバインディングがすでに存在します。
システム例外の場合は、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。
名前
COSNAMING-NAMINGCONTEXT-DESTROY
形式
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
COPY CONST IN CORBA.
01 COPY COSNAMING-NAMINGCONTEXT IN CORBA REPLACING COSNAMING-
NAMINGCONTEXT BY NC.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
PROCEDURE DIVISION.
CALL "COSNAMING-NAMINGCONTEXT-DESTROY" USING
NC
ENV.機能説明
NCで指定されたネーミングコンテキストを削除します。
復帰値
正常終了した場合は、ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定されます。
異常終了した場合は、ENV構造体のMAJORにCORBA-SYSTEM-EXCEPTIONまたはCORBA-USER-EXCEPTIONが設定され、ENV構造体のIDに詳細情報が設定されます。
ユーザ例外の場合は、以下の詳細情報が設定されます。
NCで指定されたネーミングコンテキスト内にバインディングが存在します。
システム例外の場合は、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。
名前
COSNAMING-NAMINGCONTEXT-LIST
形式
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
COPY CONST IN CORBA.
01 COPY COSNAMING-NAMINGCONTEXT IN CORBA REPLACING COSNAMING-NAMINGCONTEXT BY NC.
01 COPY LONG IN CORBA REPLACING CORBA-LONG BY HOW-MANY.
01 BL USAGE POINTER.
01 BI USAGE POINTER.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
PROCEDURE DIVISION.
CALL "COSNAMING-NAMINGCONTEXT-LIST" USING
NC
HOW-MANY
BL
BI
ENV.機能説明
ネーミングコンテキスト中のバインディングのリストを、最大でHOW-MANYで指定された個数分返します。HOW-MANYで指定された値が、nsconfigファイルのbl_how_manyパラメタで設定されている最大バインディング数より大きい場合、ネーミングサービスは最大bl_how_manyパラメタで指定された個数分のバインディングを返します。HOW-MANYに0が設定された場合、クライアントはバインディングにアクセスするためのBIと、長さ0のシーケンスのBLを返します。
リストはBLで指定されたCOSNAMING-BINDINGLIST構造体に設定されます。COSNAMING-BINDINGLISTは登録集で次のように宣言されています。
01 COSNAMING-BINDING.
02 BINDING-NAME.
03 COPY LONG IN CORBA REPLACING CORBA-LONG BY SEQ-MAXIMUM.
03 COPY LONG IN CORBA REPLACING CORBA-LONG BY SEQ-LENGTH.
03 SEQ-BUFFER USAGE IS POINTER.
02 COPY ENUM IN CORBA REPLACING CORBA-ENUM BY BINDING-TYPE.
88 COSNAMING-NOBJECT VALUE 0.
88 COSNAMING-NCONTEXT VALUE 1.
01 COPY ENUM IN CORBA REPLACING CORBA-ENUM BY COSNAMING-BINDINGTYPE.
88 COSNAMING-NOBJECT VALUE 0.
88 COSNAMING-NCONTEXT VALUE 1.
01 COSNAMING-BINDINGLIST.
02 SEQ-MAXIMUM PIC 9(9) COMP-5.
02 SEQ-LENGTH PIC 9(9) COMP-5.
02 SEQ-BUFFER USAGE IS POINTER. ネーミングコンテキスト内のバインディングの数がHOW-MANYで指定された数よりも多い場合、ネーミングコンテキスト内での現在の位置を示すオブジェクトが生成され、このオブジェクトリファレンスがBIに返されます。このオブジェクトをバインディングアイテレータといいます。BIに返されたオブジェクトリファレンスは、COSNAMING-BINDINGITERATOR-NEXT-ONE関数およびCOSNAMING-BINDINGITERATOR-NEXT-N関数の呼び出し時に使用します。
NCには、CORBA-ORB-RESOLVE-INITIAL-REFERENCES関数で得たネーミングサービスのオブジェクトリファレンス（ネーミングサービスの初期ネーミングコンテキストを示す）、またはCOSNAMING-NAMINGCONTEXT-NEW-CONTEXT関数で作成したネーミングコンテキストのオブジェクトリファレンスを指定します。
本関数はバインディングアイテレータおよびバインディングリストを格納する領域を獲得するため、これらの領域が不要になった時点で、COSNAMING-NAMINGCONTEXT-DESTROY関数およびCORBA-FREE関数を使用して領域を解放する必要があります。
復帰値
正常終了した場合は、ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定されます。
異常終了した場合は、ENV構造体のMAJORにCORBA-SYSTEM-EXCEPTIONが設定され、IDとMINORに詳細情報が設定されます。IDとMINORの意味については、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。