![[About]](r:\html\lsrxabout.gif)
![[Toc]](r:\html\lsrxtoc.gif)
0.9b (c) 1995 Peter Childs
The function returns a list of directories that have had directory limits applied to them. Before this function can be used successfully, directory limits must be enabled on the 386-HPFS drive. (See the NetMisc(NETDASDCONTROL) function)
Syntax
MyRc = NetEnumerate(NETDASD, 'DASDInfo', SrvName)
Parameters
The parameters required and returned are:
'DASDInfo' The directory limits information variable, which is divided
into:
o DASDInfo.DirPath
A string containing the directory path to be enumerated The string
must be directory path, beginning with the drive letter, and only
ending with a backslash when a root directory is specified.
If DASDInfo.DirPath is set to '', the function returns all root
directories and subdirectories with directory limits for each logical
386-HPFS drive.
If a redirected drive is specified for DASDInfo.DirPath, the SrvName
parameter must be ''
o DASDInfo.BufferSize
This is a internal workbuffer to hold the directory limits. It is
used to limit the amount of returned directory limits
o DASDInfo.recursive
A varaible controlling recursive enumeration. The values are:
Value Meaning
----- -------
0 Return directory limit for the
directory specified only
1 Return all directory limits for
the directory specified and all
subdirectories
The default value is 0
o DASDInfo.count
The number of directory limits returned. The variable i has a value
from 1 to DASDInfo.count for the following parameters
o DASDInfo.EntriesAvail
This is a parameter returned to indicate if there where more data
available with the Buffer Size specified
If the value is larger then DASDInfo.count then more data than
BufferSize was available. Otherwise the BufferSize was sufficient for
to hold all directory limits retrieved
o DASDInfo.i.resource_name
The relative name of the directory having a directory limit. For the
base path itself, the value '' is returned. The folowing directory
entries are all relative to the base path (DASDInfo.DirPath)
o DASDInfo.i.max
The amount of disk space allotted to this directory by directory
eimits. Specified in KB, this field can be set from 1 to 67108863.
o DASDInfo.i.use
The amount (in KB) of disk space already occupied within the
specified directory resource
o DASDInfo.i.thresh
The initial alert threshold as a percentage of the total directory
limit space allotted, with values ranging from 0 to 99. Zero
specifies that no threshold alert is to be generated, and 99
specifies that an alert is generated when 99% of the allotted
directory limit for this directory has been reached.
o DASDInfo.i.delta
The increment in which alerts are to be generated after the
DASDInfo.i.thresh threshold has been crossed, but before all of the
allotted disk space has been used.
SrvName The computer name of the server to enumerate the directory
limits on
Note
The server computer name can be specified as '' for a local server.
Example
/* Enumerate DASD directory limit on server */ call RxFuncAdd 'LoadLsRxutFuncs', 'LSRXUT', 'LoadLsRxutFuncs' call LoadLsRxutFuncs NETDASD = 750 DASDInfo.DirPath = 'D:\APPS\DATA' DASDInfo.recursive = 1 DASDInfo.BufferSize = 4096 SrvName = '\\DOMAIN_CONTRLR' myRc = NetEnumerate(NETDASD, 'DASDInfo', SrvName) if myRc <> '0' then do say 'Got error from NetEnumerate() ' myRc exitRc = 9 end else do say 'Directory limit enumeration returned' say 'Number entries available' DASDInfo.EntriesAvail say 'Number entries returned ' DASDInfo.count say 'First dir path ' DASDInfo.1.resource_name say 'First limit size ' DASDInfo.1.max say 'First limit usage ' DASDInfo.1.use say 'Threshold ' DASDInfo.1.thresh say 'Delta ' DASDInfo.1.delta exitRc = 0 end call DropLsRxutFuncs call RxFuncDrop 'LoadLsRxutFuncs' exit exitRc
Example Output
Directory limit enumeration returned Number entries available 1 Number entries returned 1 First dir path First limit size 512 First limit usage 102 Threshold 90 Delta 5
Inf-HTML End Run - Successful