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

TPSPRIO() - set service request priority

01 TPPRIDEF-REC.
 COPY TPPRIDEF. 
 
01 TPSTATUS-REC.
 COPY TPSTATUS. 
 
CALL "TPSPRIO" USING TPPRIDEF-REC TPSTATUS-REC.

TPSPRIO() sets the priority for the next request sent or forwarded. The priority set affects only the next request sent. (Priority can also be set for messages enqueued or dequeued by TPENQUEUE() or TPDEQUEUE() if the queued management facility is installed.) By default, the setting of PRIORITY in TPPRIDEF-REC increments or decrements a service's default priority up to a maximum of 100 or down to a minimum of 1 depending on its sign, where 100 is the highest priority. The default priority for a request is determined by the service to which the request is being sent. This default may be specified administratively (see UBBCONFIG(5)), or take the system default of 50. TPSPRIO() has no effect on messages sent via TPCONNECT() or TPSEND().

The following is a list of valid settings in TPPRIDEF-REC.

TPABSOLUTE

The priority of the next request should be sent out at the absolute value of PRIORITY. The absolute value of PRIORITY must be within the range 1 and 100, inclusive, with 100 being the highest priority. Any value outside of this range causes a default value to be used.

TPRELATIVE

The priority of the next request should be sent out at the relative value of PRIORITY.

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

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

[TPEINVAL]

TPPRIDEF-REC settings are invalid.

[TPEPROTO]

TPSPRIO() was called improperly.

[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.

TPACALL(3cbl), TPCALL(3cbl), TPDEQUEUE(3cbl), TPENQUEUE(3cbl), TPGPRIO(3cbl)