IBM Mainframe Discussion List <[email protected]> wrote on 
06/29/2012 10:32:45 AM:

> From: Ken French <[email protected]>
> To: [email protected], 
> Date: 06/29/2012 10:37 AM
> Subject: Re: Unable to Delete Orphaned VSAM Data Components
> Sent by: IBM Mainframe Discussion List <[email protected]>
> 
> Sri -
> 
> In the DELETE VVR job, which volume would the 'VOLUME' DD point to? 
> I don't think DELETE VVR will work because the volume that contained
> the data component no longer exists on my system.
> 
> Same for the PRINT VVDS job. That wouldn't seem to work because the 
> volume that the catalog entry points to, which presumably would 
> contain the VVDS, does not exist.
> 
> - Ken
> 
> 
> > Date: Fri, 29 Jun 2012 10:09:18 -0700
> > From: [email protected]
> > Subject: Re: Unable to Delete Orphaned VSAM Data Components
> > To: [email protected]
> > 
> > > > I have several VSAM data components in one of my USERCATs that are
> > > cataloged to volumes that no longer exist. I've searched extensively
> > > on how this might be done, and have tried several variations of the 
> > > IDCAMS DELETE command without success, including DELETE <entry> 
> > > NOSCRATCH, DELETE <entry> TRUENAME. I even attempted to REPRO 
> > > MERGECAT the orphaned entries to a new, temporary USERCAT that I 
> > > planned to simply delete if the MERGECAT was successful. Any ideas 
> > > on how to eliminate these undesired and orphaned catalog entries? 
> > > Keep in mind that the volumes these entries are pointing to do not 
> > > exist on my system.
> > > > 
> > > > 
----------------------------------------------------------------------
> > > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > > send email to [email protected] with the message: INFO 
IBM-MAIN
> > > > 
> > 
> > You need to issue DELETE VVR command along with FILE keyword.
> > 
> > ex:
> > 
> > //STEP0100 EXEC PGM=IDCAMS
> > //SYSPRINT DD SYSOUT=*
> > //VOLUME   DD DISP=OLD,VOL=SER=volser
> > //SYSIN    DD *
> >   DELETE orphan.data/index.component.name -
> >   VVR - FILE(VOLUME)
> > //*
> > 
> > 
> > Alternatively you can also Print the VVDS and find the original 
catalog 
> > name and then create a ICF catalog with that name. You could then do a 

> > DEFINE RECATALOG followed by a DELETE. 
> > 
> > ----------------------------------------------------------------------
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to [email protected] with the message: INFO IBM-MAIN
> 
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
> 

Ken,

Code the "Volser" with the actual volume serial. 

If that doesn't work you may have to zap the CCHHR address in VTOC and 
fool the system to think that it is not VSAM dataset.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to