IBM OS/2 LAN Server REXX Utility DLL


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


NETUSERMODALS Set Info


The function sets global modals related information for all user accounts 
and groups in the user accounts subsystem (UAS) database.   
Syntax 


MyRc = NetSetInfo(NETUSERMODALS, 'PARAMETER', parmValue, SrvName)

  
Parameters 
The parameters required are: 
'PARAMETER'       The parameter name of the user modals to be modified. 
                  The parameter values that causes a change of the user 
                  modals definitions are specified below. Only one 
                  parameter value can be changed at a time. If the 
                  parameter is invalid or the parameter value is unknown 
                  or in error, no changes will occour. 
   o min_passwd_len 
     The minimum password length 
   o max_passwd_age 
     The maximum password age in days 
   o min_passwd_age 
     The minimum password age in days 
   o force_logoff 
     The length of time (in seconds) after the valid logon hours that the 
     user account should be forced off the network 
   o password_hist_len 
     The length of the password history, that is, the number of passwords 
     in the history buffer that are scanned versus the new password in a 
     password change attempt 
parmValue         The value of the parameter that is being modified 
SrvName           The domain controller computer name 
  
Note 
The server computer name can be specified as '' for a local domain 
controller.   
Example   


/* Set user modals */
call RxFuncAdd 'LoadLsRxutFuncs', 'LSRXUT', 'LoadLsRxutFuncs'
call LoadLsRxutFuncs

NETUSERMODALS = 360
SrvName       = '\\DOMAIN_CONTRLR'

parmValue = 6 /* Minimum password length is 6 */

myRc = NetSetInfo(NETUSERMODALS, 'min_passwd_len', parmValue, SrvName)

if myRc <> '0' then do
 say 'Got error from NetSetInfo() ' myRc
 exitRc = 9
end
else do
 say 'Done'
end

call DropLsRxutFuncs
call RxFuncDrop 'LoadLsRxutFuncs'

exit exitRc

  
Example Output   


Done



Inf-HTML End Run - Successful