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

4.15.9 COSTRANSACTIONS-CURRENT-SUSPEND

名前

　COSTRANSACTIONS-CURRENT-SUSPEND

形式

DATA DIVISION.
  WORKING-STORAGE SECTION.
   COPY CONST IN COSTRANSACTIONS.
   COPY CONST IN CORBA.
   01 COPY CURRENT IN CORBA REPLACING COSTRANSACTIONS-CURRENT BY CURRENTOBJ.
   01 COPY CONTROL IN  CORBA REPLACING COSTRANSACTIONS-CONTROL BY CONTROLOBJ.
   01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.

PROCEDURE DIVISION. 
  CALL "COSTRANSACTIONS-CURRENT-SUSPEND" USING
   CURRENTOBJ
   ENV
   CONTROLOBJ.

機能説明

　アプリケーションで生成したトランザクションをいったんカレントスレッドとの関係を切り離し、停止させます。そのトランザクションを管理するトランザクションコンテキストを管理するCONTROLオブジェクトを返します。
　この機能が正常終了した場合、RESUME機能が実行されるまで、このトランザクションは有効になりません。

パラメタ

　CURRENTOBJ：

　CORBA-ORB-RESOLVE-INITIAL-REFERENCESメソッド(CORBA-ORB-OBJECTID-TRANCURRENT)で取得したCURRENTインタフェースのオブジェクトリファレンスを指定します。

　ENV：

　例外情報を獲得するためにCORBA-ENVIRONMENT構造体を指定します。

復帰値

正常終了した場合は、ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定されます。復帰値にCOSTRANSACTIONS-CONTROLオブジェクトを返します。
　異常終了した場合は、ENV構造体のMAJORにCORBA-SYSTEM-EXCEPTIONが設定され、ENV構造体のIDに詳細情報が設定されます。

EX-CORBA-STEXCEP-NO-MEMORY：
  動的メモリの獲得に失敗しました。
EX-CORBA-STEXCEP-UNKNOWN：
  CORBAサービスで初期化エラーが発生しました。
EX-CORBA-STEXCEP-INTERNAL：
  CORBAサービスで異常が発生しました。