IBM OS/2 LAN Server REXX Utility DLL


Inf-HTML [About][Toc][Index] 0.9b (c) 1995 Peter Childs


RxSplPurgeQueue()


The function removes all jobs, except any currently printing, from a print 
queue. 
Syntax 


MyRc = RxSplPurgeQueue(ComputerName, QueueName)


Parameters 
The required parameter values are: 
ComputerName   Must be either be specified as '' for a local computer or 
               '\\computername'. 
QueueName      The name of the queue where the print jobs resides 

Example use 

/* Purge print jobs in a queue on a specified computer */
if RxFuncQuery('RxSplPurgeQueue') <> 0 then do
 call RxFuncAdd 'LoadLsRxutFuncs', 'LSRXUT', 'LoadLsRxutFuncs'
 call LoadLsRxutFuncs
end

ComputerName = '\\ILIDC'
QueueName    = 'IBM4019L'

MyRc = RxSplPurgeQueue(ComputerName, QueueName)

if MyRc <> '0' then do
 say 'Error from RxSplPurgeQueue. RC =' MyRc
 exit 9
end
else do
 say 'Print jobs purged in queue' QueueName
end

exit 0


Inf-HTML End Run - Successful