Good Evening To All,
 
We have noticed that some of the VIRs on several volumes are very small.  We 
would like to increase the size.  I am not sure if I am on the right track this 
is why I need your help.
 
The VIR exsists on the volume and in order to increase the size I will need to 
purge it and reallocate it.  Below are the 2 jobs I would like to use.  Would 
they work?  Is there another way of going about it?  I would welcome your 
suggestions.  
 
Job to delete the VTOCIX
 
//STEP1 EXEC PGM=ICKDSF,REGION=3M               
//MYVOL DD  UNIT=(3390,,DEFER),VOL=SER=PROD21,  
//          DSN=SYS1.VTOCIX.PROD21,DISP=SHR     
//SYSIN     DD *                                
//SYSPRINT DD SYSOUT=*                          
//SYSIN DD  *                                   
 BUILDIX DDNAME(MYVOL) OSVTOC PURGE             
/*                                              
Job to build the VTOCIX
 
/*                                                        
//STEP01   EXEC PGM=ICKDSF,REGION=4M,PARM='NOREPLYU'      
//PROD21   DD DSN=SYS1.VTOCIX.PROD21,UNIT=SYSALLDA,      
//      VOL=SER=PROD21,DISP=NEW,SPACE=(CYL,(2))        
//SYSPRINT DD SYSOUT=*                                    
//SYSIN DD *                                              
  BUILDIX  IXVTOC,DDNAME(PROD21)                          
/*                                                        
//                                                                           
                        
Thanks in advance



      
__________________________________________________________________________________
See what's on at the movies in your area. Find out now: 
http://au.movies.yahoo.com/session-times/

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to