TPUNADVERTISE
形式
01 SERVICE-NAME PIC X(15). 01 TPSTATUS-REC. COPY TPSTATUS. CALL "TPUNADVERTISE" USING SERVICE-NAME TPSTATUS-REC.
機能
TPUNADVERTISEは，あるサーバにそのサーバで提供する，あるサービスの広告を取り消すことを許可します。省略時には，サーバのサービスは，ブート時に広告されて，シャットダウンされたときに広告を取り消されます。
TPUNADVERTISEは，サーバで宣伝していたSERVICE-NAMEを削除します。SERVICE-NAMEには，SPACES（空白）は使えません。また，SERVICE-NAMEは15文字以下になるようにしてください。15文字よりも長い場合は，15文字に切り詰められます。切り詰められた名称が ほかのサービス名と一致しないようにしてください。
『データ領域』
『●SERVICE-NAME
サービスのサービス名を設定します。』
『●TPSTATUS-REC
TPUNADVERTISEの実行結果を示すリターン値が設定されます。』
リターン値
成功した場合，TPUNADVERTISEはTP-STATUSにTPOKを設定します。
エラー
次のような場合，TPUNADVERTISEはエラーリターンして，次のうちどれか一つの値をTP-STATUSに設定します。
- TPEINVAL
-
SERVICE-NAMEにSPACES（空白）を設定しています。
- TPENOENT
-
SERVICE-NAMEは，現在このサーバで広告されていません。
- TPEPROTO
-
TPUNADVERTISEが間違った状況で呼ばれました。
- TPESYSTEM
-
コミュニケーションリソースマネジャシステムでエラーが起こりました。厳密なエラーの性質は，product-specificな方法で定義されます。
- TPEOS
-
オペレーティングシステムにエラーが起こりました。厳密なエラーの性質は，product-specificな方法で定義されます。
関連項目
TPADVERTISE
『OpenTP1で使う場合の注意事項』
-
『一つのノードで負荷分散している場合（マルチサーバ），TPUNADVERTISEをどれか一つのプロセスが実行すると，負荷分散しているプロセスすべてでサービスを受け付けられなくなります。その後，TPADVERTISEで再びサービスを広告すれば，サービス要求を受け付けられるようになります。』