IBM OS/2 LAN Server REXX Utility DLL

0.9b (c) 1995 Peter Childs

RxSplDeleteDevice()

The function deletes a printer device definition. 

Syntax 

MyRc = RxSplDeleteDevice(ComputerName, PrDevName)

Parameters 

The parameter values are: 

MyRc           Return code from the function call 

ComputerName   The name of the computer on which the Printer Device exist. 
               Use '' for a local computer 

PrDevName      The printer device name to delete 

Example use 

/* Delete printer device */
if RxFuncQuery('RxSplDeleteDevice') <> 0 then do
 call RxFuncAdd 'LoadLsRxutFuncs', 'LSRXUT', 'LoadLsRxutFuncs'
 call LoadLsRxutFuncs
end

ComputerName = '\\ILIDC'
PrDevName    = 'DelPrint'

MyRc = RxSplDeleteDevice(ComputerName, PrDevName)

if MyRc <> '0' then do
 say 'Error from RxSplDeleteDevice. RC =' MyRc
 exit 9
end

say 'Printer device deleted successfully'

exit 0

Inf-HTML End Run - Successful