Tried that, still no go:

DELETE  (                                   -                         
          HLQC01.HLQC002.HLQ3.HLQ04.CLUSTER  -                         
         ) PURGE                                                       
IDC3012I ENTRY HLQC01.HLQC002.HLQ3.HLQ04.CLUSTER NOT FOUND             
IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42 
IDC0551I ** ENTRY HLQC01.HLQC002.HLQ3.HLQ04.CLUSTER NOT DELETED        
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8              
                                                                       
 SET MAXCC = 0                                                         
                                                                       
 DEFINE CLUSTER(NAME  (HLQC01.HLQC002.HLQ3.HLQ04.CLUSTER)  -           
                MODEL (HLQC01.HLQC002.HLQ3.HLQ04.HLQ05.FILE.NAME3) -   
                RECATALOG -                                            
               ) -                                                     
          DATA  (NAME (HLQC01.HLQC002.HLQ3.HLQ04.ED0399C7) ) -         
          INDEX (NAME (HLQC01.HLQC002.HLQ3.HLQ04.O19KLAD7) )           
IDC3013I DUPLICATE DATA SET NAME                                       
IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEM-52 
IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12                     
                                                                       
 DELETE  (                                   -                         
          HLQC01.HLQC002.HLQ3.HLQ04.CLUSTER  -                         
         ) PURGE                                                       
IDC3012I ENTRY HLQC01.HLQC002.HLQ3.HLQ04.CLUSTER NOT FOUND             
IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42 
IDC0551I ** ENTRY HLQC01.HLQC002.HLQ3.HLQ04.CLUSTER NOT DELETED        
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8              
                                                                       
IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 12     

Unless I coded that DEFINE incorrectly?  Is the CATALOG parameter required?  
Help appreciated.

Peter

> -----Original Message-----
> From: IBM Mainframe Discussion List [mailto:[email protected]] On
> Behalf Of Robert A. Rosenberg
> Sent: Monday, December 27, 2010 4:43 PM
> To: [email protected]
> Subject: Re: How to delete orphaned Data and Index components?
<Snipped> 
> Have you tried creating a new cluster (different name) pointing at
> the orphaned data and index components using the recatalog parm and
> then if that succeeds, deleting it?
--

This message and any attachments are intended only for the use of the addressee 
and
may contain information that is privileged and confidential. If the reader of 
the 
message is not the intended recipient or an authorized representative of the
intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited. If you have received this communication in
error, please notify us immediately by e-mail and delete the message and any
attachments from your system.


----------------------------------------------------------------------
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