Corporate Info  |  News  |  Solutions  |  Products  |  Partners  |  Services  |  Events  |  Download  |  How To Buy
	http://www.oracle.com/technology/documentation/index.html   |   Site Map   |   Search   |   PDF Files   |   Contact   |   Glossary
Tuxedo Doc Home   |   Reference   |   Topic List   |   Previous   |   Next   |   Contents

   BEA Tuxedo COBOL Function Reference

TPUNADVERTISE() - routine for unadvertising service names

01 SVC-NAME PIC X(15). 
01 TPSTATUS-REC.
 COPY TPSTATUS. 
CALL "TPUNADVERTISE" USING SVC-NAME TPSTATUS-REC.

TPUNADVERTISE() allows a server to unadvertise a service that it offers. By default, a server's services are advertised when it is booted and they are unadvertised when it is shutdown.

All servers belonging to a multiple server, single queue (MSSQ) set must offer the same set of services. These routines enforce this rule by affecting the advertisements of all servers sharing an MSSQ set.

TPUNADVERTISE() removes SVC-NAME as an advertised service for the server (or the set of servers sharing the caller's MSSQ set). SVC-NAME cannot be SPACES. Also, SVC-NAME should be 15 characters or less. (See the SERVICES section of UBBCONFIG(5)). Longer names will be accepted and truncated to 15 characters. Care should be taken such that truncated names do not match other service names.

Upon successful completion, TPUNADVERTISE() sets TP-STATUS to [TPOK].

Under the following conditions, TPUNADVERTISE() fails and sets TP-STATUS to:

[TPEINVAL]

Invalid arguments were given (for example SVC-NAME is SPACES).

[TPENOENT]

SVC-NAME is not currently advertised by the server.

[TPEPROTO]

TPUNADVERTISE() was called in an improper context (for example, by a client).

[TPESYSTEM]

A BEA Tuxedo system error has occurred. The exact nature of the error is written to a log file.

[TPEOS]

An operating system error has occurred.

TPADVERTISE(3cbl)