IBM OS/2 LAN Server REXX Utility DLL

0.9b (c) 1995 Peter Childs

NETLOGONASN Get Info

The function retrieves information about logon assignments for a specified 
userid.   

Syntax 

MyRc = NetGetInfo(NETLOGONASN, 'logonAsnInfo', SrvName, UserId)

Parameters 

The parameters specified are: 

'logonAsnInfo'    The REXX variable receiving the result. The variable is 
                  divided into: 

   o logonAsnInfo.count 

     The count of logon assignments. If this value is equal or large than 
     1 then the following values are assigned: 

   o logonAsnInfo.i.alias 

     The alias name assigned. The variable i has a value from 1 to 
     logonAsnInfo.count 

   o logonAsnInfo.i.type 

     The alias type. The variable i has a value from 1 to 
     logonAsnInfo.count 

   o logonAsnInfo.i.device 

     The local device. The variable i has a value from 1 to 
     logonAsnInfo.count 

SrvName           The server computer name of the domain controller 

UserId            The userid 
  

Note 

The server computer name can be specified as '' for a local domain 
controller.   

Example   

/* Get the user logon assignments information */
call RxFuncAdd 'LoadLsRxutFuncs', 'LSRXUT', 'LoadLsRxutFuncs'
call LoadLsRxutFuncs

NETLOGONASN = 52
SrvName     = '\\ILIDC'
UserId      = 'FMAM'

myRc = NetGetInfo(NETLOGONASN, 'logonAsnInfo', SrvName, UserId)

if myRc <> '0' then do
 say 'Got error from NetGetInfo() ' myRc
 call DropLsRxutFuncs
 exit 9
end

if logonAsnInfo.count = 0 then do
 say 'No logon assignments'
 call DropLsRxutFuncs
 exit 0
end

say 'The number of logon assignments are: ' logonAsnInfo.count

do i=1 to logonAsnInfo.count
 say
 say 'The Alias assigned: ' logonAsnInfo.i.alias
 say 'Alias type:         ' logonAsnInfo.i.type
 say 'Device assigned:    ' logonAsnInfo.i.device
end

call DropLsRxutFuncs
call RxFuncDrop 'LoadLsRxutFuncs'

exit 0

Example Output   

The number of logon assignments are:  3

The Alias assigned:  BOOKS
Alias type:          Files alias
Device assigned:     O

The Alias assigned:  MYDEMO
Alias type:          Files alias
Device assigned:     P

The Alias assigned:  SRVCOM
Alias type:          Serial device alias
Device assigned:     COM3

Inf-HTML End Run - Successful