Do these volumes contain any VSAM datasets?

Lizette



>
>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)                          
>/*                                                        
>//                                                                           
>                        
>

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

Reply via email to