IBM OS/2 LAN Server REXX Utility DLL


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


NetMisc(NETMESSAGENAMEUNFWD)


The function stops forwarding of messages.   
Syntax 


MyRc = NetMisc(NETMESSAGENAMEUNFWD, msgName, SrvName)

  
Parameters 
The parameters required are: 
msgName           The string specifying the userid name whose message 
                  forwarding is to be canceled. A value must be specified 
SrvName           A server computer name if remote otherwise '' 
  
Example   


/* Un-Forward a message name */
call RxFuncAdd 'LoadLsRxutFuncs', 'LSRXUT', 'LoadLsRxutFuncs'
call LoadLsRxutFuncs

NETMESSAGENAMEUNFWD = 570
msgName             = 'ADMIN04'
SrvName             = ''

myRc = NetMisc(NETMESSAGENAMEUNFWD, msgName, SrvName)

if myRc <> '0' then do
 say 'Got error from NetMisc() ' myRc
 exitRc = 9
end
else do
 say 'Message name un-forwarded successfully'
end

call DropLsRxutFuncs
call RxFuncDrop 'LoadLsRxutFuncs'

exit exitRc

  
Example Output   


Message name un-forwarded successfully



Inf-HTML End Run - Successful