Hitachi

OpenTP1 Version 7 分散トランザクション処理機能 OpenTP1 プログラム作成リファレンス COBOL言語編


CBLDCMCF('CLOSE ')

〈このページの構成〉

名称

MCF環境のクローズ

形式

PROCEDURE DIVISIONの指定

CALL  'CBLDCMCF' USING 一意名1

DATA DIVISIONの指定

01 一意名1.
   02 データ名A  PIC  X(8) VALUE 'CLOSE   '.
   02 データ名B  PIC  X(5).
   02 FILLER    PIC  X(3).
   02 データ名C  PIC  S9(9) COMP VALUE ZERO.
   02 データ名D  PIC  X(12) VALUE LOW-VALUE.

機能

MCFの機能を使う環境をクローズします。CBLDCMCF('OPEN ')を呼び出したUAPのメインプログラムで,CBLDCRPC('CLOSE ')を呼び出す前に,プロセスで1回だけ呼び出します。

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

●データ名A

MHPの終了を示す要求コードを「VALUE 'CLOSE△△△'」と設定します。

●データ名C

0を設定します。

●データ名D

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

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

●データ名B

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

ステータスコード

ステータスコード

意味

00000

正常に終了しました。

72016

データ名Dに設定した値が間違っています。

72028

データ名Aに設定した値が間違っています。

上記以外

プログラムの破壊などによる,予期しないエラーが発生しました。