CBLDCMCF('TEMPGET ')

PROCEDURE DIVISIONの指定

CALL 'CBLDCMCF' USING 一意名1 一意名2 一意名3

DATA DIVISIONの指定

01 一意名1.
   02 データ名A  PIC X(8) VALUE 'TEMPGET '.
   02 データ名B  PIC X(5).
   02 FILLER     PIC X(3).
   02 データ名C  PIC X(4) VALUE SPACE.
   02 データ名D  PIC X(4) VALUE SPACE.
   02 データ名E  PIC 9(8).
   02 データ名F  PIC 9(8).
   02 データ名G  PIC 9(9) COMP.
   02 データ名H  PIC X(4) VALUE SPACE.
   02 データ名I  PIC X(4) VALUE SPACE.
   02 データ名J  PIC X(4) VALUE SPACE.
   02 データ名K  PIC X(4) VALUE SPACE.
   02 データ名L  PIC X(8) VALUE SPACE.
   02 データ名M1 PIC X(4) VALUE SPACE.
   02 データ名M2 PIC X(8) VALUE SPACE.
   02 データ名M3 PIC X(4) VALUE SPACE.
   02 データ名M4 PIC 9(9) COMP VALUE ZERO.
   02 データ名M5 PIC 9(9) COMP VALUE ZERO.
   02 データ名M6 PIC X(1) VALUE SPACE.
   02 データ名M7 PIC X(1).
   02 データ名N  PIC X(14) VALUE LOW-VALUE.
01 一意名2.
   02 データ名O  PIC X(4) VALUE SPACE.
   02 データ名P  PIC X(8) VALUE SPACE.
   02 データ名Q  PIC X(8) VALUE SPACE.
   02 データ名R  PIC X(8) VALUE SPACE.
   02 データ名S  PIC X(28) VALUE LOW-VALUE.
01 一意名3.
   02 データ名T  PIC 9(x) COMP.
   02 データ名U  PIC X(x).
   02 データ名V  PIC X(n).

●データ名A

一時記憶データの受け取りを示す要求コードを「VALUE 'TEMPGET△'」と設定します。

●データ名C，データ名D

空白を設定します。

●データ名E，データ名F

MCFで使用する領域です。

●データ名G

一時記憶データを受け取る領域の長さを9〜32,008バイト（バッファ形式1の場合），または7〜32,006バイト（バッファ形式2の場合）で設定します。

●データ名H，データ名I，データ名J，データ名K，データ名L，データ名M1，データ名M2，データ名M3

空白を設定します。

●データ名M4，データ名M5

0を設定します。

●データ名M6

空白を設定します。

●データ名M7

使用するバッファ形式を設定します。

'1' … バッファ形式1を使用する場合に設定します。

'2' … バッファ形式2を使用する場合に設定します。

●データ名N

「LOW-VALUE」を設定します。

●データ名O，データ名P，データ名Q，データ名R

空白を設定します。

●データ名S

「LOW-VALUE」を設定します。

●データ名U

【バッファ形式1の場合】 PIC X（8）

【バッファ形式2の場合】 PIC X（4）

MCFで使用する領域です。

●データ名B

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

●データ名T

【バッファ形式1の場合】 PIC 9（9）

前回更新した一時記憶データの長さが返されます。初期状態の場合，継続問い合わせ応答用一時記憶領域の長さ（アプリケーション属性定義（mcfaalcap -n）のtempsizeオペランドの指定値）が返されます。

【バッファ形式2の場合】 PIC 9（4）

前回更新した一時記憶データの長さ＋6が返されます。初期状態の場合，継続問い合わせ応答用一時記憶領域の長さ（アプリケーション属性定義（mcfaalcap -n）のtempsizeオペランドの指定値）＋6が返されます。

●データ名V

受け取った一時記憶データが返されます。初期状態の場合，継続問い合わせ応答用一時記憶領域の長さ（アプリケーション属性定義（mcfaalcap -n）のtempsizeオペランドの指定値）分だけ(00)₁₆が埋められます。