$ SET VERIFY=(PROCEDURE,IMAGE)
$ RUN SYS$SYSTEM:DISKQUOTA.EXE
USE USERDISC1
CREATE
MODIFY [000000,000000]/PERMQUOTA=1000              /OVERDRAFT=100            
ADD    [000001,000004]/PERMQUOTA=1000000           /OVERDRAFT=0              
ADD    [000001,000006]/PERMQUOTA=1000000           /OVERDRAFT=0              
ADD    [000001,000007]/PERMQUOTA=1000000           /OVERDRAFT=0              
ADD    [000001,000010]/PERMQUOTA=1000000           /OVERDRAFT=0              
ADD    [000002,000001]/PERMQUOTA=1000000           /OVERDRAFT=0              
ADD    [000002,000002]/PERMQUOTA=1000000           /OVERDRAFT=0              
ADD    [000002,000003]/PERMQUOTA=1000000           /OVERDRAFT=0              
ADD    [000002,000004]/PERMQUOTA=1000000           /OVERDRAFT=0              
ADD    [000003,000001]/PERMQUOTA=1000000           /OVERDRAFT=0              
ADD    [000012,000001]/PERMQUOTA=1000000           /OVERDRAFT=0              
ADD    [000012,000002]/PERMQUOTA=1000000           /OVERDRAFT=0              
ADD    [000012,000003]/PERMQUOTA=2000              /OVERDRAFT=200            
ADD    [000012,000005]/PERMQUOTA=6000              /OVERDRAFT=600            
ADD    [000012,000006]/PERMQUOTA=100000            /OVERDRAFT=0              
ADD    [000012,000007]/PERMQUOTA=1000000           /OVERDRAFT=0              
ADD    [000012,000010]/PERMQUOTA=1000000           /OVERDRAFT=0              
ADD    [000050,000022]/PERMQUOTA=1000              /OVERDRAFT=100            
REBUILD
EXIT
$ SET VERIFY=(NOPROCEDURE,NOIMAGE)
