| View previous topic :: View next topic | 
	
	
		| Author | Message | 
	
		| subbuy2k Beginner
 
 
 Joined: 12 Aug 2004
 Posts: 29
 Topics: 18
 
 
 | 
			
				|  Posted: Wed Jun 01, 2005 10:57 am    Post subject: Recovering Uncatalog tapes |   |  
				| 
 |  
				| Hi, can you please tell me how to recover the tape which was uncataloged. i have the volume number and still the tape is not scratched.
 Please any one help me as early as possible.
 
 thanks
 subbu
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| kolusu Site Admin
 
  
 
 Joined: 26 Nov 2002
 Posts: 12394
 Topics: 75
 Location: San Jose
 
 | 
			
				|  Posted: Wed Jun 01, 2005 11:10 am    Post subject: |   |  
				| 
 |  
				| subbuy2k, 
 Try this
 
 
  	  | Code: |  	  | //STEP0100 EXEC  PGM=IEFBR14
 //*
 //FILE01   DD  DSN=YOUR UNACATALOGUED TAPE DATASET,
 //             DISP=(MOD,CATLG,KEEP),
 //             VOL=SER=XXXX
 /*
 
 | 
 
 Hope this helps...
 
 Cheers
 
 kolusu
 _________________
 Kolusu
 www.linkedin.com/in/kolusu
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| subbuy2k Beginner
 
 
 Joined: 12 Aug 2004
 Posts: 29
 Topics: 18
 
 
 | 
			
				|  Posted: Wed Jun 01, 2005 11:27 am    Post subject: |   |  
				| 
 |  
				| Kolusu, The job ran fine, but the dataset is not recovered.  Actually the tape is a GDG. so do i have to give any other file name to copy
 
 Thanks
 subbu
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| kolusu Site Admin
 
  
 
 Joined: 26 Nov 2002
 Posts: 12394
 Topics: 75
 Location: San Jose
 
 | 
			
				|  Posted: Wed Jun 01, 2005 12:10 pm    Post subject: |   |  
				| 
 |  
				| subbuy2k, 
 Try this
 
 
  	  | Code: |  	  | //STEP0100 EXEC PGM=IDCAMS
 //SYSPRINT DD  SYSOUT=*
 //SYSIN    DD  *
 DEFINE NONVSAM                               -
 (NAME(YOUR UNCATALOGUED TAPE DATASET)   -
 DEVICETYPE(TAPE)                       -
 VOLUME(xxxxx)                          -
 NORECATALOG)
 /*
 
 | 
 
 Hope this helps...
 
 Cheers
 
 kolusu
 _________________
 Kolusu
 www.linkedin.com/in/kolusu
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| subbuy2k Beginner
 
 
 Joined: 12 Aug 2004
 Posts: 29
 Topics: 18
 
 
 | 
			
				|  Posted: Thu Jun 02, 2005 1:03 am    Post subject: |   |  
				| 
 |  
				| Thanks a lot kolusu. It works successfully.. 
 Regards
 subbu
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| subbuy2k Beginner
 
 
 Joined: 12 Aug 2004
 Posts: 29
 Topics: 18
 
 
 | 
			
				|  Posted: Thu Jun 02, 2005 8:48 am    Post subject: |   |  
				| 
 |  
				| Kolusu, i got the tape but not able to use it. when i try to retrive the datas from that it gives me the error "VOLUME "914430" INCONSISTENT WITH UNIT TAPE   "
 Can you please help me as early as possible.
 
 thanks
 subbu
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| kolusu Site Admin
 
  
 
 Joined: 26 Nov 2002
 Posts: 12394
 Topics: 75
 Location: San Jose
 
 | 
			
				|  Posted: Thu Jun 02, 2005 8:51 am    Post subject: |   |  
				| 
 |  
				| subbuy2k, 
 Please post the exact error messages with message codes.
 
 Kolusu
 _________________
 Kolusu
 www.linkedin.com/in/kolusu
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| subbuy2k Beginner
 
 
 Joined: 12 Aug 2004
 Posts: 29
 Topics: 18
 
 
 | 
			
				|  Posted: Thu Jun 02, 2005 9:38 am    Post subject: |   |  
				| 
 |  
				| I have submitted the job to copy those tape to new dataset using both IDCAMS and Fileaid Utility. I get the following errors. 
 using IDCAMS  utility i get the below error.
 REPRO INFILE(DD01) OUTFILE(DD01O)
 IDC3300I  ERROR OPENING G2MK00AP.MBLC.PRIOR.BUYER.G0055V00
 IDC3321I ** OPEN/CLOSE/EOV ABEND EXIT TAKEN
 IDC0005I NUMBER OF RECORDS PROCESSED WAS 0
 IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12
 
 IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 12
 
 --
 When Submitted using FILEAID UTILITY i get the below errors
 
 $$DD01 COPY
 ER048-OPEN ERROR 813-04 WAS ENCOUNTERED ON DD01
 .....SKIPPING TO NEXT $$DD CARD                                          RC=12
 
 
 Thanks
 subbu
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| kolusu Site Admin
 
  
 
 Joined: 26 Nov 2002
 Posts: 12394
 Topics: 75
 Location: San Jose
 
 | 
			
				|  Posted: Thu Jun 02, 2005 10:29 am    Post subject: |   |  
				| 
 |  
				| subbuy2k, 
 A return code of 04(813-04 ) means that an OPEN macro instruction was issued for a data set on magnetic tape, but the data set name on the header label did not match that in the JFCB.
 
 For an uncataloged tape, the system only checks the last bytes 17 bytes of your DSN against what's in the tape label. So you need to make sure that the name match the last 17bytes.
 
 The last 17 bytes in your dataset name
 
  	  | Code: |  	  | ----+----1----+----2----+----3----
 G2MK00AP.MBLC.PRIOR.BUYER.G0055V00
 
 | 
 
 is
 
 
  	  | Code: |  	  | RIOR.BUYER.G0055V00
 
 | 
 
 So try putting that name in quotes in repro cards and see if it works.pre-allocate the output dataset.
 
 ex:
 
  	  | Code: |  	  | REPRO IDS('RIOR.BUYER.G0055V00') -
 ODS('YOUR OUTPUT FILE NAME') REPLACE
 
 | 
 
 If nothing works then use BLP (By pass Label processing).To use BLP code LABEL=(2,BLP) on DD stmt, which tells the program to read from the second physical label on the tape. Don't forget to specify the the DCB parameters RECFM, LRECL, and BLKSIZE when using BLP
 
 Hope this helps...
 
 Cheers
 
 kolusu
 _________________
 Kolusu
 www.linkedin.com/in/kolusu
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| subbuy2k Beginner
 
 
 Joined: 12 Aug 2004
 Posts: 29
 Topics: 18
 
 
 | 
			
				|  Posted: Thu Jun 02, 2005 12:39 pm    Post subject: |   |  
				| 
 |  
				| Kolusu, A return code of 04(813-04 )  came when i tried using Fileaid utility. While using IDCAMS I got
 
 REPRO INFILE(DD01) OUTFILE(DD01O)
 IDC3300I  ERROR OPENING G2MK00AP.MBLC.PRIOR.BUYER.G0051V00
 
 
 I have tried using RIOR.BUYER.G0055V00
 but shows me the error
 
 IKJ56228I DATA SET RIOR.BUYER.G0055V00 NOT IN CATALOG OR CATALOG CAN
 IKJ56228I NOT BE ACCESSED
 
 Can you please tell me how to use LABEL=(2,BLP) also which utility i have to use for this.
 
 Thanks
 subbu
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		|  | 
	
		|  |