| View previous topic :: View next topic | 
	
	
		| Author | Message | 
	
		| juan00982 Beginner
 
 
 Joined: 29 Jun 2004
 Posts: 36
 Topics: 13
 Location: PR
 
 | 
			
				|  Posted: Tue Apr 05, 2005 9:28 am    Post subject: ADRDSSU Restore JCL Sample |   |  
				| 
 |  
				| Hi, 
 I used this program to backup to tape, now I want to restore the file but I'm having problems doing so.  Can anyone provide a sample JCL showing how to restore a file. any help will be greatly apreciated.
 
 Thanks,
 
 Juan
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| kolusu Site Admin
 
  
 
 Joined: 26 Nov 2002
 Posts: 12394
 Topics: 75
 Location: San Jose
 
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| juan00982 Beginner
 
 
 Joined: 29 Jun 2004
 Posts: 36
 Topics: 13
 Location: PR
 
 | 
			
				|  Posted: Tue Apr 05, 2005 9:41 am    Post subject: |   |  
				| 
 |  
				| kolusu, 
 I'm new to mianframes, I just came out from OS/2 to OS390 so you can see that we've made a big jump.  I saw this documentation but it's a little hard to set jcl up using the documentation. So I just wanted for someone who may already have JCL created in their library to copy it here so that I can modify and adapt to what I have here.
 
 Thanks,
 
 Juan
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| kolusu Site Admin
 
  
 
 Joined: 26 Nov 2002
 Posts: 12394
 Topics: 75
 Location: San Jose
 
 | 
			
				|  Posted: Tue Apr 05, 2005 9:53 am    Post subject: |   |  
				| 
 |  
				| Juan, 
 Try this JCL
 
  	  | Code: |  	  | //STEP0100  EXEC PGM=ADRDSSU
 //SYSPRINT  DD SYSOUT=*
 //TAPE      DD DSN=YOUR.TAPE.BACKUP,
 //             DISP=OLD
 //SYSIN     DD *
 RESTORE DATASET(INCLUDE(YOUR DSN NAME))     -
 INDDNAME(TAPE)                              -
 OUTDYNAM(your o/p vol)                      -
 REPLACE          /* REPLACE DATA SET IF ALREADY THERE */
 /*
 
 | 
 
 Hope this helps...
 
 Cheers
 
 kolusu
 _________________
 Kolusu
 www.linkedin.com/in/kolusu
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| juan00982 Beginner
 
 
 Joined: 29 Jun 2004
 Posts: 36
 Topics: 13
 Location: PR
 
 | 
			
				|  Posted: Tue Apr 05, 2005 10:00 am    Post subject: |   |  
				| 
 |  
				| I Ran this JCL but I'm getting and error: 
 TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'RESTORE '
 2005.095 10:48:14 INITIAL SCAN OF USER CONTROL STATEMENTS COMPLETED.
 RACF LOGGING OPTION IN EFFECT FOR THIS TASK
 2005.095 10:48:14 EXECUTION BEGINS
 2005.095 10:48:45 DFSMSDSS FUNCTION TASK ABEND RECOVERY ROUTINE WAS ENTERED. SYSTEM ABEND CODE=0813
 NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY VOLUME
 2005.095 10:48:45 EXECUTION ENDS
 2005.095 10:48:45 TASK COMPLETED WITH RETURN CODE 0008
 2005.095 10:48:45 DFSMSDSS PROCESSING COMPLETE. HIGHEST RETURN CODE IS 0008
 TASK    001
 
 Any Ideas ?
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| kolusu Site Admin
 
  
 
 Joined: 26 Nov 2002
 Posts: 12394
 Topics: 75
 Location: San Jose
 
 | 
			
				|  Posted: Tue Apr 05, 2005 10:07 am    Post subject: |   |  
				| 
 |  
				| jaun, 
 You need to provide the Error message. The error messages start with ADR*** which can be found in the sysprint which are to the extreme left of the error messages you posted above.
 
 Thanks
 
 Kolusu
 _________________
 Kolusu
 www.linkedin.com/in/kolusu
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| juan00982 Beginner
 
 
 Joined: 29 Jun 2004
 Posts: 36
 Topics: 13
 Location: PR
 
 | 
			
				|  Posted: Tue Apr 05, 2005 10:11 am    Post subject: |   |  
				| 
 |  
				| ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'RESTORE ' ADR109I (R/I)-RI01 (01), 2005.095 10:48:14 INITIAL SCAN OF USER CONTROL STATEMENTS COMPLETED.
 ADR016I (001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK ROUTINE WAS ENTERED. SYSTEM ABEND CODE=0813
 ADR006I (001)-STEND(01), 2005.095 10:48:14 EXECUTION BEGINS
 ADR049E (001)-STEND(01), 2005.095 10:48:45 DFSMSDSS FUNCTION TASK ABEND RECOVERY
 ADR415W (001)-TDDS (02), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY VOLUME
 ADR006I (001)-STEND(02), 2005.095 10:48:45 EXECUTION ENDS
 ADR013I (001)-CLTSK(01), 2005.095 10:48:45 TASK COMPLETED WITH RETURN CODE 0008
 ADR012I (SCH)-DSSU (01), 2005.095 10:48:45 DFSMSDSS PROCESSING COMPLETE. HIGHEST RETURN CODE IS 0008 FROM:
 TASK    001
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| juan00982 Beginner
 
 
 Joined: 29 Jun 2004
 Posts: 36
 Topics: 13
 Location: PR
 
 | 
			
				|  Posted: Tue Apr 05, 2005 10:12 am    Post subject: |   |  
				| 
 |  
				| I left it out, I didn't though it was needed. ops. |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| dneufarth Beginner
 
 
 Joined: 05 Apr 2005
 Posts: 11
 Topics: 0
 
 
 | 
			
				|  Posted: Tue Apr 05, 2005 11:11 am    Post subject: |   |  
				| 
 |  
				| I believe an 813 abend is an incorrect name on the tape label vs. the dsn in the dd statement. 
 
 Dave
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		|  | 
	
		|  |