ABC_TSCfactimpl(COBOL)

ABC_TSCfactimplは雛形クラスです。

ABC_TSCfactimplは,TSCユーザオブジェクトファクトリを実現するためのクラスです。実際の副プログラムのプリフィックスは"ABC_TSCfact"となります。各副プログラム名の"_TSCfact"の部分は,tscidl2cblコマンドの-TSCfact_extオプションによって変更できます。省略した場合,"_TSCfact"が設定されます。

形式

斜体で示している部分は,ユーザが実装のコードを記述する必要がある副プログラムです。太字で示している部分は,引数の型および数を変更できる副プログラムで,ユーザが実装のコードを記述する必要があります。

CALL 'ABC_TSCfact-NEW'
           ...
            RETURNING          FACTORY-PTR.

CALL 'ABC_TSCfact-crt' USING
                 BY VALUE      FACTORY-PTR
            RETURNING          OBJECT-PTR.
CALL 'ABC_TSCfact-dst' USING
                 BY VALUE      FACTORY-PTR
                 BY VALUE      SK-PTR.

CALL 'ABC_TSCfact-get' USING
            RETURNING          FACTORY-PTR.

CALL 'ABC_TSCfact-rls' USING
                 BY VALUE      FACTORY-PTR.

CALL 'ABC_TSCfact-DEL' USING
           BY VALUE FACTORY-PTR
           ....

副プログラム

●CALL 'ABC_TSCfact-NEW'

     ...
        RETURNING   FACTORY-PTR.

項目型・意味
戻り値FACTORY-PTR USAGE POINTERABC_TSCfact-getの戻り値

ABC_TSCfactを作成します。引数の型や数を含めて,ユーザがコードを記述する必要があります。

名称を変更して複数の副プログラムを作成できますが,どの副プログラムの戻り値にも,次に示す副プログラムを実行して得られる戻り値を設定する必要があります。

CALL 'ABC_TSCfact-get' USING
        RETURNING FACTORY-PTR.

●CALL 'ABC_TSCfact-crt' USING

           BY VALUE    FACTORY-PTR
        RETURNING   OBJECT-PTR.

項目型・(入出力の区別)意味
引数BY VALUE FACTORY-PTR USAGE POINTER(入力)ABC_TSCfact-NEWの戻り値
戻り値OBJECT-PTR USAGE POINTERABC_TSCimpl-NEWの戻り値

ABC_TSCimplを作成するための副プログラムです。典型的なコードを生成するため,ユーザは必要に応じて変更してください。

この副プログラムの戻り値には,次に示す副プログラムまたは同等のユーザ実装副プログラムを実行して得られる戻り値を設定する必要があります。

CALL 'ABC_TSCimpl-NEW' ...
        RETURNING OBJECT-PTR.

●CALL 'ABC_TSCfact-dst' USING

           BY VALUE    FACTORY-PTR
           BY VALUE    SK-PTR.

項目型・(入出力の区別)意味
引数BY VALUE FACTORY-PTR USAGE POINTER(入力)ABC_TSCfact-NEWの戻り値
BY VALUE SK-PTR USAGE POINTER(入力)ABC_TSCimpl-NEWの戻り値

ABC_TSCimplを削除するための副プログラムです。典型的なコードを生成するため,ユーザは必要に応じて変更してください。

この副プログラムでは,次の副プログラムを実行する必要があります。

CALL 'ABC_TSCimpl-DEL' USING
           BY VALUE SK-PTR ... .

●CALL 'ABC_TSCfact-get'

        RETURNING         FACTORY-PTR.

項目型・意味
戻り値FACTORY-PTROTM内部のファクトリのポインタ

ユーザ定義IDLインタフェース依存クラスのABC_TSCfactとOTMを関連づけて,OTM内部のファクトリのポインタを返します。この副プログラムは必ずABC_TSCfact-NEWから呼び出して,その戻り値をABC_TSCfact-NEWの戻り値に設定してください。この副プログラムはユーザが変更してはいけません。

●CALL 'ABC_TSCfact-rls'

           BY VALUE     FACTORY-PTR.

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

ユーザ定義IDLインタフェース依存クラスのABC_TSCfactとOTMの関連づけを解除します。この副プログラムは必ずABC_TSCfact-DELから呼び出してください。この副プログラムは変更できません。

●CALL 'ABC_TSCfact-DEL' USING

           BY VALUE FACTORY-PTR
           ....

項目型・(入出力の区別)意味
引数BY VALUE FACTORY-PTR USAGE POINTER(入力)ABC_TSCfact-NEW の戻り値
戻り値ありません。

ABC_TSCfactを削除します。引数の型や数を含めて,ユーザがコードを記述する必要があります。名称を変更して複数の副プログラムを作成できますが,どの副プログラムも,次のように発行する必要があります。

CALL 'ABC_TSCfact-rls' USING
           BY VALUE FACTORY-PTR.