CBLDCRPC('GETSVPRI')

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

PROCEDURE DIVISIONの指定

 
CALL 'CBLDCRPC'  USING 一意名1

DATA DIVISIONの指定

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

CBLDCRPC('SETSVPRI')で設定したサービス要求のスケジュールプライオリティを参照します。CBLDCRPC('GETSVPRI')がリターンする値は，UAPからCBLDCRPC('SETSVPRI')を再び呼び出すまで変わりません。

次に示す場合は，CBLDCRPC('GETSVPRI')は省略時仮定値「4」をデータ名Cにリターンします。

●データ名A

サービス要求のスケジュールプライオリティの参照を示す要求コードを「VALUE 'GETSVPRI'」と設定します。

●データ名B

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

●データ名C

スケジュールプライオリティが，1から8の範囲の値で返されます。

ステータスコード	意味
00000	正常に終了しました。
00301	データ名に設定した値が間違っています。要求コード（データ名A）が間違っている場合も含みます。
上記以外	プログラムの破壊などによる，予期しないエラーが起こりました。