On Thu, 28 May 1992 17:15:42 IST Moshe Barak said: >Hello all , >Is there a way (well , a reasonable one) to collect information on the >file server utilization for a specified list ? A list owner wants to know >wether the files he is storing are in use at all. Can this be done ? We do this by modifying LSV$GETQ, the GET quota exit. All we do is record some of the pertinent information in a monthly log file on a special disk. We've also written some local commands which only the owner can run to retrieve the info (we consider the destination privileged information - I have yet to write a simple local command to summarize statistics for anyone). Below are the added or changed lines in LSV$GETQ (I think I got them all). You should be able to figure out where they go (ie. the init stuff is at the entry, etc.). Marty ----- /* NDSU mgh Log Definitions... */ logdate=date('S') logtime=time() logfn = 'LSGET' logft = 'LOG'substr(logdate,3,4) /* LOGyymm */ logfm = 'G' /* Log Disk */ ----- Ok: /* NDSU MGH 01/24/90 Add log record... */ call logit logdate logtime left(filelist,8) left(fn,8) left(ft,8) , format(#blocks,8,0) destination origin strip(userdata) Exit 0 userdata ----- LOGIT: /* Log Record NDSU MGH 01/24/90 */ parse arg logitarg 'EXECIO 1 DISKW' logfn logft logfm '(FINIS VAR LOGITARG' logrc=rc if logrc<>0 then do say 'LSV$GETQ ERROR Writing to' logfn logft logfm ' EXECIO rc='logrc say 'LSV$GETQ Data="'logitarg'"' end return logrc