Hi all, 

I have some temporary files not deleted. Seen with 3.4 with volume given. When 
i tried to delete them , i had an error message (entry not found) 

Listcat gave this :

LISTCAT ENTRIES(SYS12048.T104505.RA000.IBMUSER.R0100008)              
IDC3012I ENTRY SYS12048.T104505.RA000.IBMUSER.R0100008 NOT FOUND        
IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42  
IDC1566I ** SYS12048.T104505.RA000.IBMUSER.R0100008 NOT LISTED          

Tried with IDCAMS DELETE : 

//STEP010  EXEC PGM=IDCAMS                                 
//DD01     DD DSN=SYS12048.T104505.RA000.IBMUSER.R0100008, 
//         DISP=OLD,VOL=SER=WORK01,UNIT=3390               
//SYSPRINT DD SYSOUT=*                                     
//SYSIN    DD *,DCB=BLKSIZE=9040                           
  DELETE  FILE(DD01) NONVSAM PURGE                       
              
IKJ56228I DATA SET FILE NOT IN CATALOG OR CATALOG CAN NOT BE ACCESSED  
IDC0548I ** MEMBER DD01 NOT DELETED                                    
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8              
                                                                       
IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 8      

===

Now , a colleague asked me to delete with IEBFR14 :

//DELETE   EXEC PGM=IEFBR14                         
//Duc DD DSN=SYS12048.T104505.RA000.IBMUSER.R0100008,         
//            DISP=(OLD,DELETE),SPACE=(TRK,(0,0)),VOL=SER=WORK01,UNIT=3390    


This worked !!!
But when i asked him to explain me how does this worked and not IDCAMS , he 
could not give me the reason. 
Can you please  tell me ? 
Thank you for your explanation.

Duc  

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

Reply via email to