CBLDCMCF('TEMPPUT ')

名称

一時記憶データの更新

形式

PROCEDURE DIVISIONの指定

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

DATA DIVISIONの指定

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

機能

継続問い合わせ応答用の一時記憶領域に格納されているデータを更新します。

送信するセグメントの領域(一意名3で示す領域)の形式を次に示します。

[図データ]

UAPで値を設定するデータ領域

●データ名A

一時記憶データの更新を示す要求コードを「VALUE 'TEMPPUT△'」と設定します。

●データ名C,データ名D

空白を設定します。

●データ名E,データ名F

MCFで使う領域です。

●データ名G

0を設定します。

●データ名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」を設定します。

●データ名T

【バッファ形式1の場合】 PIC 9(9)

【バッファ形式2の場合】 PIC 9(4)

一時記憶データの更新データ長を設定します。

●データ名U

【バッファ形式1の場合】 PIC X(8)

【バッファ形式2の場合】 PIC X(4)

MCFで使う領域です。

●データ名V

一時記憶データの更新データが格納されている領域を設定します。

OpenTP1から値が返されるデータ領域

●データ名B

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

ステータスコード

ステータスコード意味
00000正常に終了しました。
71103一時記憶データを更新するための領域が確保できませんでした。
72000SPPでは,一時記憶データを更新できません。
72016データ名N,データ名Sに設定した値が間違っています。
72028データ名Aに設定した値が間違っています。
72035更新データ長の値(データ名T)が,MCFアプリケーション定義で指定した一時記憶データ格納用領域の長さを超えています。
更新データ長の値が1バイト未満(バッファ形式1の場合),または7バイト未満(バッファ形式2の場合)です。
72101継続問い合わせ応答型(type=cont)でないMHPで,CBLDCMCF('TEMPPUT ')を呼び出しています。
72105CBLDCMCF('TEMPGET ')で一時記憶データを受け取る前に,
CBLDCMCF('TEMPPUT ')を呼び出しています。
72106先頭セグメントを受信する CBLDCMCF('RECEIVE ')を呼びだす前に,CBLDCMCF('TEMPPUT ')を呼び出しています。
72107CBLDCMCF('CONTEND ')をすでに呼び出した 継続問い合わせ応答型(type=cont)のMHPから,CBLDCMCF('TEMPPUT ')を呼び出しています。
上記以外プログラムの破壊などによる,予期しないエラーが起こりました。