TPSVRDONE(3cbl)

名前

TPSVRDONE() - BEA Tuxedo ATMI のサーバ終了ルーチン

形式

01 TPSTATUS-REC.
 COPY TPSTATUS. 
PROCEDURE DIVISION. 
* User code 
EXIT PROGRAM.

機能説明

BEA Tuxedo ATMI のサーバ用ルーチンは、サービス要求の処理完了後、サーバを終了する前に TPSVRDONE() を呼び出します。 このルーチンを呼び出した時点では、サーバはまだシステムの一部のままですが、それ独自のサービスは宣言から外されています。 このため、このルーチンで、BEA Tuxedo ATMI とのコミュニケーションとトランザクションの定義を行うことができます。 ただし、オープンされたままの接続がある場合、保留中の非同期応答がある場合、あるいはまだトランザクション・モードにある場合に TPSVRDONE() が終了すると、BEA Tuxedo システムはその接続をクローズし、保留中の応答を無視し、トランザクションをロールバックします。その後で、サーバは終了します。

アプリケーションがサーバにこのルーチンを提供していない場合、BEA Tuxedo システムが提供するデフォルトのバージョンが代わりに呼び出されます。 デフォルトの TPSVRDONE() は TPCLOSE() と USERLOG() を呼び出し、サーバが終了することを通知します。

使用法

TPRETURN() または TPFORWAR() が TPSVRDONE() において呼び出されても、これらのルーチンは何も影響を及ぼさず終了するだけです。

関連項目