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

4.11.4.2 CORBA-CONTAINER-CONTENTS

名前

　CORBA-CONTAINER-CONTENTS

形式

DATA DIVISION.
  WORKING-STORAGE SECTION.
    COPY CONST IN CORBA.
    01 COPY OBJECT IN CORBA REPLACING CORBA-OBJECT BY OBJ.
    01 COPY DEFINITIONKIND IN CORBA REPLACING CORBA-DEFINITIONKIND BY LIMIT-TYPE.
    01 COPY BOOLEAN IN CORBA REPLACING CORBA-BOOLEAN BY EXCLUDE-INHERITED.
    01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
    01 CONTAINEDSEQ-ADDR USAGE POINTER.

PROCEDURE DIVISION.
    CALL "CORBA-CONTAINER-CONTENTS" USING
         OBJ
         LIMIT-TYPE 
         EXCLUDE-INHERITED 
         ENV
         CONTAINEDSEQ-ADDR.

機能説明

　OBJに指定されたインタフェースリポジトリオブジェクトに直接包含される、または継承によって包含されるインタフェースリポジトリオブジェクトのオブジェクトリファレンスをリスト形式で返します。
　本関数はオブジェクトリファレンスのリストを格納する領域を獲得するため、この領域が不要になった時点で、CORBA-FREE関数を使用して領域を解放する必要があります。

• limit-typeで指定されたインタフェースタイプの包含オブジェクトが返却対象となります。
• exclude-inheritedでTRUEが指定された場合は、継承オブジェクトは返却対象としません。
• limit-typeがCORBA-DK-ALLで、かつexclude-inheritedがFALSEの場合は、包含/継承するすべてのオブジェクトリファレンスのリストを返します。
• 返却対象のオブジェクトが見つからない場合は、返却リストのSEQ-LENGTHに0が設定され、オブジェクトリファレンスは不定となります。

復帰値

　正常終了した場合、検索されたオブジェクトのオブジェクトリファレンスのリストが返されます。
　異常終了した場合、NIL（空の）オブジェクトリファレンスのリストが返されます。また、ENV構造体のMAJORにはCORBA-SYSTEM-EXCEPTIONが返され、IDとMINORに詳細情報が設定されます。IDとMINORの意味については、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。