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