MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

ADRDSSU Restore JCL Sample

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Job Control Language(JCL)
View previous topic :: View next topic  
Author Message
juan00982
Beginner


Joined: 29 Jun 2004
Posts: 36
Topics: 13
Location: PR

PostPosted: Tue Apr 05, 2005 9:28 am    Post subject: ADRDSSU Restore JCL Sample Reply with quote

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
View user's profile Send private message Send e-mail
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose

PostPosted: Tue Apr 05, 2005 9:36 am    Post subject: Reply with quote

juan00982,

Please search before posting. Check this link for the documentation of ADRDSSU with examples.

http://www.mvsforums.com/helpboards/viewtopic.php?t=2161&highlight=adrdssu

Hope this helps...

cheers

kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
juan00982
Beginner


Joined: 29 Jun 2004
Posts: 36
Topics: 13
Location: PR

PostPosted: Tue Apr 05, 2005 9:41 am    Post subject: Reply with quote

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
View user's profile Send private message Send e-mail
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose

PostPosted: Tue Apr 05, 2005 9:53 am    Post subject: Reply with quote

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
View user's profile Send private message Send e-mail Visit poster's website
juan00982
Beginner


Joined: 29 Jun 2004
Posts: 36
Topics: 13
Location: PR

PostPosted: Tue Apr 05, 2005 10:00 am    Post subject: Reply with quote

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
View user's profile Send private message Send e-mail
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose

PostPosted: Tue Apr 05, 2005 10:07 am    Post subject: Reply with quote

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
View user's profile Send private message Send e-mail Visit poster's website
juan00982
Beginner


Joined: 29 Jun 2004
Posts: 36
Topics: 13
Location: PR

PostPosted: Tue Apr 05, 2005 10:11 am    Post subject: Reply with quote

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
View user's profile Send private message Send e-mail
juan00982
Beginner


Joined: 29 Jun 2004
Posts: 36
Topics: 13
Location: PR

PostPosted: Tue Apr 05, 2005 10:12 am    Post subject: Reply with quote

I left it out, I didn't though it was needed. ops.
Back to top
View user's profile Send private message Send e-mail
dneufarth
Beginner


Joined: 05 Apr 2005
Posts: 11
Topics: 0

PostPosted: Tue Apr 05, 2005 11:11 am    Post subject: Reply with quote

I believe an 813 abend is an incorrect name on the tape label vs. the dsn in the dd statement.


Dave
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Job Control Language(JCL) All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group