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

検索

Tuxedo COBOL リファレンス

名前

TPGETCTXT()－現在のアプリケーション関連のコンテキスト識別子を取り出す

形式

01 TPCONTEXTDEF-REC.
   COPY TPCONTEXTDEF.

01 TPSTATUS-REC.
   COPY TPSTATUS.
 
CALL "TPGETCTXT" USING TPCONTEXTDEF-REC TPSTATUS-REC.

機能説明

TPGETCTXT() は、現在のアプリケーション関連のコンテキストを表す識別子を検索し、その識別子を TPCONTEXTDEF-REC 内の CONTEXT に入れます。一般的な COBOL アプリケーションの処理は次のとおりです。

TPGETCTXT() は、シングルコンテキスト・アプリケーションおよびマルチコンテキスト・アプリケーションで呼び出すことができます。

戻り値

TPGETCTXT は正常終了時には、TP-STATUS に [TPOK] を設定し、プログラムのコンテキスト識別子を TPCONTEXTDEF-REC 内の CONTEXT に入れます。CONTEXT には現在のコンテキスト ID が設定されます。これは、次のいずれかで表されます。

注記 TPINVALIDCONTEXT がCOBOL プログラムで返されることはありません。この値は、マルチスレッドのプログラムでしか返されないからです。

エラー

TPGETCTXT の異常終了時には、TP-STATUS に次のいずれかの値が設定されます。