セクション 3(cbl) - COBOL 関数

ドキュメントのダウンロード

サイトマップ

用語集

検索

e-docs > Tuxedo > Tuxedo COBOL リファレンス > セクション 3(cbl) - COBOL 関数

Tuxedo COBOL リファレンス

TPSETCTXT(3cbl)

名前

TPSETCTXT()－現在のアプリケーション関連のコンテキスト識別子を設定する

形式

01 TPCONTEXTDEF-REC.
   COPY TPCONTEXTDEF.

01 TPSTATUS-REC.
   COPY TPSTATUS.

CALL "TPSETCTXT" USING TPCONTEXTDEF-REC TPSTATUS-REC.

機能説明

TPSETCTXT() は、現在のプログラムが動作するコンテキストを定義します (マルチスレッドの COBOL アプリケーションは現在サポートされていません)。これ以降の BEA Tuxedo の呼び出しは、TPCONTEXTDEF-REC の CONTEXT で示されるアプリケーションを参照します。TPCONTEXTDEF-REC の CONTEXT の値は、事前の TPGETCTXT() 呼び出しで提供されます。CONTEXT の値が TPNULLCONTEXT の場合、プログラムはどの BEA Tuxedo コンテキストとも関連しません。入力時に TPCONTEXTDEF-REC の CONTEXT に TPINVALIDCONTEXT を設定すると無効になります。

戻り値

TPSETCTXT() は正常終了時には、TP-STATUS に [TPOK] を設定します。

異常終了時には、TPSETCTXT() は呼び出し元プロセスのコンテキストを変更せず、TP-STATUS にエラー条件を示す値を設定します。

エラー

TPSETCTXT() は異常終了時には、TP-STATUS に次のいずれかの値を設定します。

[TPEINVAL]

無効な引数が指定されました。

[TPENOENT]

TPCONTEXTDEF-REC の CONTEXT の値が有効なコンテキストではありません。

[TPEPROTO]

TPSETCTXT() の呼び出し方法が不適切です。たとえば、TPINITIALIZE() を呼び出していないプロセスや TP-MULTI-CONTEXTS を設定せずに TPINITIALIZE() が呼び出されたプロセスで TPSETCTXT() が呼び出された場合です。

[TPESYSTEM]

BEA Tuxedo システムのエラーが発生しました。エラーの正確な内容は、ログ・ファイルに書き込まれます。

[TPEOS]

オペレーティング・システムのエラーが発生しました。