IBM OS/2 LAN Server REXX Utility DLL


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


NETGROUP Add


The function creates a group.   
Syntax 


MyRc = NetAdd(NETGROUP, 'groupInfo', SrvName)

  
Parameters 
The parameters required are: 
'groupInfo'       The REXX variable holding the group information. The 
                  variable is divided into 
   o groupInfo.name 
     The group name 
   o groupInfo.comment 
     The group comment or description. A default comment will be provided 
     if groupInfo.comment does not hold a value. 
SrvName           The server computer name of the domain controller 
  
Note 
The server computer name can be specified as '' for a local domain 
controller.   
Example   


/* Create a new group with a comment */
call RxFuncAdd 'LoadLsRxutFuncs', 'LSRXUT', 'LoadLsRxutFuncs'
call LoadLsRxutFuncs

NETGROUP = 70
SrvName  = '\\ILIDC'
groupInfo.name = 'CSUSERS'
groupInfo.comment = 'The Client/Server users group'

myRc = NetAdd(NETGROUP, 'groupInfo', SrvName)

if myRc <> '0' then do
 say 'Got error from NetAdd() ' myRc
 call DropLsRxutFuncs
 exit 9
end
else do
 say
 say "Group created successfully"
end

call DropLsRxutFuncs
call RxFuncDrop 'LoadLsRxutFuncs'

exit 0

  
Example Output   


Group created successfully



Inf-HTML End Run - Successful