Hitachi

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


CBLDCADM('COMPLETE')

〈このページの構成〉

名称

ユーザサーバの開始処理完了の報告

形式

PROCEDURE DIVISIONの指定

CALL 'CBLDCADM' USING 一意名1

DATA DIVISIONの指定

01 一意名1.
   02 データ名A  PIC X(8)  VALUE 'COMPLETE'.
   02 データ名B  PIC X(5).
   02 FILLER    PIC X(3).
   02 データ名Z  PIC S9(9)  COMP VALUE ZERO.

機能

SUPの開始処理が終了したことを,OpenTP1に報告します。呼び出したCBLDCADM('COMPLETE')が正常に終了したことで,SUPの起動が完了します。

SPPとMHPでは,CBLDCRSV('MAINLOOP')およびCBLDCMCF('MAINLOOP')が正常に終了したことで開始処理の終了と見なすため,CBLDCADM('COMPLETE')を呼び出す必要はありません。

オフラインの業務をするUAPからは,CBLDCADM('COMPLETE')を呼び出せません。

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

●データ名A

ユーザサーバの開始処理完了の報告を示す要求コードを「VALUE 'COMPLETE'」と設定します。

●データ名Z

0を設定します。

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

●データ名B

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

ステータスコード

ステータスコード

意味

00000

正常に終了しました。

01802

要求コード(データ名A)が間違っています。

01830

プロセス間通信でエラーが起こりました。

01831

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

01832

ステータス情報の入出力エラーが起こりました。

01833

ユーザサーバが正常開始中,または再開始中ではありません。