Nick de Smith
Applied Telematics Group
7 Vale Avenue
Tunbridge Wells
Kent TN1 1DJ
England
+44 892 511000

This program returns the diskquota information for a user in DCL local string symbols:

	DISKQ_INUSE		Symbol for inuse blocks
	DISKQ_PERMQUOTA		Symbol for permanent quota
	DISKQ_OVERDRAFT		Symbol for overdraft blocks

These symbols can be accessed by a DCL procedure and can be used in arithmetic calculations.

Format:

	$ QUOTA	= "disk:[dir]QUOTA"
	$!
	$ QUOTA	username			! Quota for "username" on their default device
 or	$ QUOTA	dev:username			! Quota for "username" on device "dev"
	$!
	$ Sho Symbol DISKQ*/Local		! Display results
	$!