CBLDCTAM('FxxR'/'FxxU'/'VxxR'/'VxxU')

PROCEDURE DIVISIONの指定

CALL 'CBLDCTAM' USING 一意名1 一意名2 一意名3 一意名4

DATA DIVISIONの指定

01 一意名1.
   02 データ名A  PIC X(4).
   02 データ名B  PIC X(5).
   02 FILLER    PIC X(3).
   02 データ名C  PIC X(32).
   02 FILLER    PIC X(68).
   02 データ名D  PIC S9(4) COMP.
   02 FILLER    PIC X(2).
   02 データ名J  PIC S9(9)  COMP.
   02 FILLER    PIC X(392).
01 一意名2.
   02 データ名E  PIC X(4).
   02 データ名F  PIC X(1).
   02 FILLER    PIC X(2).
   02 データ名I  PIC X(1).
01 一意名3.
   02 データ名G  PIC X(m).
01 一意名4.
   02 データ名H  PIC X(n).

●データ名A

TAMの識別子を設定します。ただし，TAMサービスではこの値を参照しません。

●データ名C

入力するレコードのTAMテーブル名を32文字以内で設定します。32文字未満の場合は，後ろを空白で埋めます。

●データ名D

入力するレコードが，1〜32,767バイト以下のときのバッファ長を設定します。バッファ長は，レコード長以上にします。データ名Eに「VALUE 'Fxxx'」を設定した場合だけ，この設定は有効になります。

●データ名J

入力するレコードが32,768バイト以上のときのバッファ長を設定します。バッファ長は，レコード長以上にします。データ名Eに「VALUE 'Vxxx'」を設定した場合だけ，この設定は有効になります。

●データ名E

要求コードを設定します。

VALUE 'FCHR',VALUE 'VCHR'…参照目的で'キー値＝'を検索する（ハッシュ，ツリー）。

VALUE 'FGER',VALUE 'VGER'…参照目的で'キー値＜＝'を検索する（ツリー）。

VALUE 'FGTR',VALUE 'VGTR'…参照目的で'キー値＜'を検索する（ツリー）。

VALUE 'FLER',VALUE 'VLER'…参照目的で'キー値＞＝'を検索する（ツリー）。

VALUE 'FLTR',VALUE 'VLTR'…参照目的で'キー値＞'を検索する（ツリー）。

VALUE 'FTPR',VALUE 'VTPR'…参照目的で設定したキー値の，先頭から検索する（ハッシュ）。

VALUE 'FNXR',VALUE 'VNXR'…参照目的で設定したキー値の，次のレコードから検索する（ハッシュ，ツリー）。

VALUE 'FCHU',VALUE 'VCHU'…更新目的で'キー値＝'を検索する（ハッシュ，ツリー）。

VALUE 'FGEU',VALUE 'VGEU'…更新目的で'キー値＜＝'を検索する（ツリー）。

VALUE 'FGTU',VALUE 'VGTU'…更新目的で'キー値＜'を検索する（ツリー）。

VALUE 'FLEU',VALUE 'VLEU'…更新目的で'キー値＞＝'を検索する（ツリー）。

VALUE 'FLTU',VALUE 'VLTU'…更新目的で'キー値＞'を検索する（ツリー）。

VALUE 'FTPU',VALUE 'VTPU'…更新目的で設定したキー値の，先頭から検索する（ハッシュ）。

VALUE 'FNXU',VALUE 'VNXU'…更新目的で設定したキー値の，次のレコードから 検索する（ハッシュ，ツリー）。

レコード長が32,767バイト以下のTAMテーブルの場合は「VALUE 'Fxxx'」を使用します。

レコード長が32,768バイト以上のTAMテーブルの場合は「VALUE 'Vxxx'」を使用します。

●データ名F

参照目的の入力の場合の，排他の要否種別を設定します。

VALUE '△' … 排他する（同期点で排他を解除します）。

VALUE 'D' … 排他する（この文の終了時に排他を解除します）。

VALUE 'N' … 排他しない。

排他しないでCBLDCTAM('FxxR'/'VxxR')を呼び出した場合，CBLDCTAM('FxxR'/'VxxR')処理中にほかのUAPから該当するTAMレコードが更新されることがあります。

この場合，CBLDCTAM('FxxR'/'VxxR')で入力するレコードの内容は，ほかのUAPでの更新処理の状態（コミット処理が完了するタイミング）に依存します。したがって，UAP間でデータの整合性をとるためには，必ずVALUE 'D'またはVALUE '△'を指定してください。

VALUE 'N'は，参照型のTAMテーブルの場合や，同一のTAMレコードに対して業務処理全体として参照と更新が競合する可能性がない場合に使用します。

●データ名G

キー値を設定します。キー値は，検索するレコードのキー領域の長さで設定します。

●データ名H

レコードを入力するデータ領域（バッファ）を設定します。

●データ名I

排他解除待ちの種別を，次に示す値で設定します。データ名Iに設定した値は，TAMサービス定義のtam_cbl_levelに '2' を指定した場合に有効になります。

VALUE 'W' … 排他の解除を待ちます。

VALUE 'N' … 排他の解除を待たないで，エラーリターンします。

TAMサービス定義のtam_cbl_levelに '0' または '1' を指定した場合は，データ名Iを指定する必要はありません。

●データ名B

ステータスコードが，5けたの数字で返されます。

●データ名H

入力したレコードが返されます。