TPADVERTISE
名称
サービス名の広告
形式
01 SERVICE-NAME PIC X(15).
01 PROGRAM-NAME PIC X(32).
01 TPSTATUS-REC.
COPY TPSTATUS.
CALL "TPADVERTISE" USING SERVICE-NAME PROGRAM-NAME TPSTATUS-REC.
機能
TPADVERTISEは,サーバで提供するサービスを広告します。TPADVERTISEを実行しない場合,サーバのサービスは,ブート時に広告されて,シャットダウンされたときに広告が取り消されます。
TPADVERTISEは,サーバのSERVICE-NAMEを広告します。SERVICE-NAMEは,15文字以下にしてください。ただし,SPACES(空白)は使えません。長過ぎる名称でも有効となりますが,15文字に切り詰められます。切り詰められた名称が ほかのサービス名と一致しないようにしてください。
PROGRAM-NAMEは,サービスプログラムの名称です。このプログラムは,SERVICE-NAMEへのサービス要求がサーバに受信されたら,いつでも起動されます。PROGRAM-NAMEには,SPACES(空白)を設定しないでください。
SERVICE-NAMEがすでにそのサーバで広告されていて,PROGRAM-NAMEが広告されているプログラムと一致した場合は,TPADVERTISEは正常にリターンします(切り詰められた名称が,すでに広告されていた名称と一致していた場合も含みます)。しかし,そのSERVICE-NAMEがすでにそのサーバで広告されていた場合でも,PROGRAM-NAMEが広告されているプログラムと一致しないときは,エラーリターンします(切り詰められた名称が,すでに広告されている名称と一致していた場合にも起こります)。
『データ領域』
『●SERVICE-NAME
応答するサービスのサービス名を設定します。』
『●PROGRAM-NAME
サービスプログラム名を設定します。』
『●TPSTATUS-REC
TPADVERTISEの実行結果を示すリターン値が設定されます。』
リターン値
成功した場合,TPADVERTISEはTP-STATUSにTPOKを設定します。
エラー
次のような場合,TPADVERTISEはエラーリターンして,次のうちどれか一つの値をTP-STATUSに設定します。
関連項目
TPSVCSTART,TPUNADVERTISE
『OpenTP1で使う場合の注意事項』