TSCCBLThreadFactory（COBOL）

トランザクショナル分散オブジェクト基盤　TPBroker Object Transaction Monitor　プログラマーズガイド

TSCCBLThreadFactoryは，COBOL85インタフェースのために用意された，TSCThreadFactoryの派生クラスです。

COBOL85インタフェースでは，複数のスレッドファクトリを使用したい場合，ユーザはTSCThreadFactoryクラスの派生クラスを複数作成するのではなく，TSCCBLThreadFactoryクラスにスレッドファクトリ識別子を指定します。

TSCCBLThread-beginThread副プログラムまたはTSCCBLThread-endThread副プログラム中で，該当するスレッドに応じて動作を切り分ける場合も，TSCThreadFactoryクラスのスレッドファクトリ識別子を利用します。スレッドファクトリ識別子は，スレッドの開始および終了時に呼び出されるTSCCBLThread-beginThreadおよびTSCCBLThread-endThreadが受け取る第1引数に該当します。

●CALL 'TSCCBLThreadFactory-NEW' USING

            BY VALUE   THREAD-FACT-ID
         RETURNING     THREAD-FACT-PTR.

項目	型・(入出力の区別)意味
引数	BY VALUE THREAD-FACT-ID PIC S9(9) COMP	(入力)スレッドファクトリ識別子
戻り値	THREAD-FACT-PTR USAGE POINTER	TSCCBLThreadFactoryのポインタ

TSCCBLThreadFactoryを生成します。スレッドファクトリには，THREAD-FACT-IDで指定されたスレッドファクトリ識別子が設定されます。このスレッドファクトリ識別子はTSCCBLThread-beginThreadおよびTSCCBLThread-endThreadに引数として渡されます。ユーザは，このスレッドファクトリ識別子によってTSCCBLThread-beginThreadおよびTSCCBLThread-endThreadの動作を切り替えることができます。スレッドファクトリ識別子には，ユーザが任意の値を設定できます。

●CALL 'TSCCBLThreadFactory-DELETE' USING

            BY VALUE   THREAD-FACT-PTR.

項目	型・(入出力の区別)意味
引数	BY VALUE THREAD-FACT-PTR USAGE POINTER	(入力)TSCCBLThreadFactoryのポインタ
戻り値	ありません。

TSCCBLThreadFactoryを削除します。