4.15.10 COSTRANSACTIONS-CURRENT-RESUME

名前

COSTRANSACTIONS-CURRENT-RESUME

形式

DATA DIVISION.
  WORKING-STORAGE SECTION.
   COPY CONST IN COSTRANSACTIONS.
   COPY CONST IN CORBA.
   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-RESUME" USING
   CONTROLOBJ
   ENV.

機能説明

トランザクションをカレントスレッドと関連つけます。

指定されたCONTROLオブジェクトに該当するトランザクションをカレントスレッドに関連つけます。

パラメタ

CONTROLOBJ：

COSTRANSACTIONS-CURRENT-GET-CONTROLメソッドで取得したCONTROLオブジェクトのオブジェクトリファレンスあるいは、COSTRANSACTIONS-CURRENT-SUSPENDメソッドから返却されるCONTROLオブジェクトのオブジェクトリファレンスを指定します。CONTROLに、NULLオブジェクトを指定した場合、トランザクションとカレントスレッドの関係を切り離します

ENV：

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

復帰値

正常終了した場合は、ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定されます。
異常終了した場合は、ENV構造体のMAJORにCORBA-SYSTEM-EXCEPTIONまたはCORBA-USER-EXCEPTIONが設定され、ENV構造体のIDに詳細情報が設定されます。

EX-COSTRANSACTIONS-INVALIDCONTROL：: CONTROLオブジェクト以外のオブジェクトが指定されています。

EX-CORBA-STEXCEP-INTERNAL：: CORBAサービスで異常が発生しました。