CBLEERPC('CALL ')

PROCEDURE DIVISIONの指定

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

DATA DIVISIONの指定

01 一意名1.
  02 データ名A  PIC X(8) VALUE 'CALL    '.
  02 データ名B  PIC X(5).
  02 FILLER     PIC X(3).
  02 データ名C  PIC S9(9) COMP VALUE ZERO.
  02 データ名D  PIC S9(9) COMP.
  02 データ名E  PIC X(32).
  02 データ名F  PIC X(n).
01 一意名2.
  02 データ名G  PIC 9(9) COMP.
  02 データ名H  PIC X(n).
01 一意名3.
  02 データ名I  PIC 9(9) COMP.
  02 データ名J  PIC X(n).

●データ名A

遠隔サービスの要求を示す要求コードを「VALUE 'CALL△△△△'」と設定します。

●データ名C

RPCの形態とオプションを数値で設定します。

0

同期応答型RPC

1

非応答型RPC

2

非同期応答型RPC

トランザクション処理からのサービス要求で，要求先の処理をトランザクションにしない場合は，RPCの形態を示す数値に「32」を加算します。「32」を加算すると，トランザクションの処理からのサービス要求でも，サービスプログラムの処理はトランザクションになりません。

自プロセス送信（通信レス）を行う場合，RPCの形態を示す数値に「131072」を加算します。「131072」を加算する場合は，必ず「32」も加算してください。

非同期応答型RPCで，サービス関数が設定した応答の長さを参照したい場合は，RPCの形態を示す数値に「512」を加算します。その場合は，CBLEERPC('POLLANYR')の正常終了時に，CBLEERPC('CALL')のサービス応答とサービス応答の長さに，サービス関数が設定した応答と応答の長さがそれぞれ設定されます。「512」を加算しない場合は，サービス応答だけ設定されます。

【XTC限定】サーバとの通信を，コネクションレス（UDPプロトコル）で行う場合は，RPCの形態を示す数値に「4096」を加算します。「4096」を加算する場合は，必ず「32」も加算してください。

（例1）

非応答型RPCでトランザクションにしないサービス要求をする場合

データ名Cには1＋32＝33を設定します。

（例2）

非同期応答型RPCで自プロセス宛てでサービス要求をする場合

データ名Cには2＋32＋131072＝131106を設定します。

（例3）

非同期応答型RPCでコネクションレス（UDPプロトコル）を使用して，サービス要求をする場合

データ名Cには2＋4096＋32＝4130を設定します。

●データ名E

SPPのサービス名を，31バイト以内のアスキー文字列で設定します。文字列の末尾には空白を付けてください。この空白は文字列の長さに数えません。

●データ名F

SPPのサービスグループ名を，31バイト以内のアスキー文字列で設定します。文字列の末尾には空白を付けてください。この空白は文字列の長さに数えません。

●データ名G

サービスの入力パラメタ長（データ名Hの長さ）を設定します（単位：バイト）。1〜EERPC_MAX_MESSAGE_SIZE_EX^※の範囲の値を指定できます。EERPC_MAX_MESSAGE_SIZE_EXは，eerpc.hで定義してあります。

サービス要求先がTP1/EEの場合，相手先のTP1/EEのIMAサイズ以下の値を設定してください。

注※

従来のEERPC_MAX_MESSAGE_SIZEは，eerpc.hで定義してありますが，EERPC_MAX_MESSAGE_SIZE_EXの使用をお勧めします。

●データ名H

サービスの入力パラメタを設定します。

●データ名I

サービスの応答の長さ（データ名Jの長さ）を設定します（単位：バイト）。1〜EERPC_MAX_MESSAGE_SIZE_EX^※の範囲の値を指定できます。EERPC_MAX_MESSAGE_SIZE_EXは，eerpc.hで定義してあります。

サービス要求先がTP1/EEの場合，相手先のTP1/EEのOMAサイズ以下の値を設定してください。

非応答型RPCの場合も，サービスの応答の長さを設定した領域のアドレスを指定する必要があります。この場合，サービスの応答の長さには，0を設定します。

注※

従来のEERPC_MAX_MESSAGE_SIZEは，eerpc.hで定義してありますが，EERPC_MAX_MESSAGE_SIZE_EXの使用をお勧めします。

●データ名B

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

●データ名D

非同期応答型RPCの場合に，記述子が返されます。

●データ名I

サービスプログラムが設定した応答の長さ（データ名Jの長さ）が返されます（単位：バイト）。

●データ名J

サービスプログラムが設定した応答が返されます。

サービス要求先が稼働していない場合，または送信できるコネクションがない場合

CBLEERPC('CALL ')は「00305」でエラーリターンします。

サービス要求先コネクション確立後，サービス要求時にネットワーク障害を検知した場合

CBLEERPC('CALL ')は「00306」でエラーリターンします。

ネームサービスを使用しない場合で，サービスグループ情報関連定義のeesvgdef定義コマンドにサーバUAPのサービスグループ名が設定されていないとき

ネームサービスを使用しない場合は，サービスグループ情報関連定義のeesvgdef定義コマンドの指定値を基にサービス要求先を取得します。eesvgdef定義コマンドにサーバUAPのサービスグループ名が設定されていない場合，CBLEERPC('CALL ')は「00310」でエラーリターンします。

ネームサービスを使用する場合で，該当するサービスグループ名が見つからなかったとき

ネームサービスを使用する場合は，RPC関連定義のrpc_destination_modeオペランドの指定値に従ってサービス要求先を取得します。該当するサービスグループ名が見つからなかった場合，CBLEERPC('CALL ')は「00310」でエラーリターンします。

サービス要求時にメッセージ格納領域（TCP/IPバッファ）不足がリトライ回数を超えて連続で発生した場合

CBLEERPC('CALL ')は「00339」でエラーリターンします。サービス要求のリトライ回数は，RPC関連定義のrpc_router_retry_countオペランドで指定します。サービス要求のリトライ間隔は，RPC関連定義のrpc_router_retry_intervalオペランドで指定します。そのほか，RPC関連定義のipc_sendbuf_sizeオペランドやサービス要求先のTCP/IPバッファの定義（RPC関連定義，TP1/Server Baseのユーザサービス定義またはシステム共通定義のipc_recvbuf_sizeオペランド）などを見直してください。