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(3cbl) or TPDEQUEUE(3cbl) 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(3cbl) or TPSEND(3cbl).
Following is a list of valid settings in TPPRIDEF-REC.
Upon successful completion, TPSPRIO sets TP-STATUS to [TPOK].
Under the following conditions, TPSPRIO fails and sets TP-STATUS to:
TPACALL(3cbl),
TPCALL(3cbl),
TPDEQUEUE(3cbl),
TPENQUEUE(3cbl),
TPGPRIO(3cbl)