000003 //* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 000004 //* IF A VOLUME'S FREE SPACE SOMEHOW GETS OUT OF WHACK THIS * 000005 //* WILL FIX IT, I THINK. WE DEACTIVATE AND ACTIVATE THE * 000006 //* VOLUME'S VTOC INDEX * 000007 //* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 000008 //STEP1 EXEC PGM=ICKDSF,PARM='NOREPLYU' 000009 //SYSPRINT DD SYSOUT=* 000010 //DDCARD DD DISP=OLD,UNIT=(SYSDA,,DEFER),VOL=SER=ADA004 000011 //SYSIN DD * 000012 BUILDIX DDNAME(DDCARD) OSVTOC NOPURGE 000013 //STEP2 EXEC PGM=ICKDSF,PARM='NOREPLYU' 000014 //SYSPRINT DD SYSOUT=* 000015 //IXVTOC DD DISP=OLD,UNIT=(SYSDA,,DEFER),VOL=SER=ADA004, 000016 // DSN=SYS1.VTOCIX.ADA004 000017 //SYSIN DD * 000018 BUILDIX DDNAME(IXVTOC) IXVTOC
Matthew On Thu, 22 Dec 2022 13:26:06 -0600, Steve Beaver <st...@stevebeaver.com> wrote: >I worked in a stop the got sever LSPACE errors. > > > >Can anyone tell me the command to Convert a indexed vtoc to a CVOL and back >to a INDEXED > > > > > >Regards, > > > >Steve ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN