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 

Help With ADRDSSU

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
vijay
Beginner


Joined: 09 May 2003
Posts: 131
Topics: 64
PostPosted: Thu Mar 04, 2004 10:43 am    Post subject: Help With ADRDSSU Reply with quote
Hi ,
I submitted the following ADRDSSU job and got an RC 8.COuld you please help me with this one ?
Code:

//TD4RJOB1 JOB (1243847,42T7,PPPPPP,TEST),'          ',
// CLASS=L,MSGCLASS=X,                                           
// NOTIFY=&SYSUID                                               
                                             
//STEPBS01 EXEC  PGM=ADRDSSU                                     
//*********************************************************       
//*     1. OPERATION:  BACKUP      (BACKUP OR RESTORE)    *       
//*     2. DATASETS:   VSA1, VSA2, VSA3, VSA4, VSA5       *       
//*                    VSA6, VSA7, VSA8, VSA9, VSA10      *       
//*                                                       *       
//*********************************************************       
//SYSIN    DD *
  DUMP DATASET(INCLUDE(   -                     
  TDOT.DOBT.VSA1 -                 
  TDOT.DOBT.VSA2 -                 
  TDOT.DOBT.VSA3 -                 
  TDOT.DOBT.VSA4 -                 
  TDOT.DOBT.VSA5 -                 
  TDOT.DOBT.VSA6 -                 
  TDOT.DOBT.VSA7 -                 
  TDOT.DOBT.VSA8 -                 
  TDOT.DOBT.VSA9 -                 
  TDOT.DOBT.VSA10  -                 
)) -                                           
OUTDDNAME(BACKUP1) ALLX ALLD(*) SPHERE OPT(4) 

//BACKUP1  DD DSN=TDOT.DOBT.BKUP(+1),                   
//         VOLUME=(,,,15),DISP=(,CATLG,DELETE),UNIT=CTAPE,       
//         DCB=(SORCDSCB,RECFM=VB,BLKSIZE=32760)                 
//SUMMARY  DD SYSOUT=*                                           
//DSREP1   DD SYSOUT=*                                           
//DSREP2   DD SYSOUT=*                                           
//VERLIST  DD SYSOUT=*                                           
//CATRP1   DD SYSOUT=*                                           
//CATRP2   DD SYSOUT=*                                           
//SNAP     DD SYSOUT=*                                           
//SYSOUT   DD SYSOUT=*                                           
//SYSPRINT DD SYSOUT=*                                           
//SYSUDUMP DD SYSOUT=(X,,DUMP)                                   
//DETAIL   DD SYSOUT=*                                           
//*                                                               

ERROR MESSAGE FROM ADRDSSU:

ADR412E (001)-DTDSC(04), DATA SET TDOT.DOBT.VSA10 IN CATALOG
CATALOG.TDST.PROD ON VOLUME PROD21 FAILED SERIALIZATION

DATA SET FILTERING IS COMPLETE. 9 OF 10 DATA SETS WERE SELECTED: 1 FAILED
SERIALIZATION AND 0 FAILED FOR OTHER REASONS




ERROR MESSAGE IN JESLOG:
TD4RJOB1 CONTENTION WITH TD4RJOB2 OWNS SHR  ON JKS1     
TD4RJOB1 NEEDS EXCL SYSDSN   TDOT.DOBT.VSA10





1.I got a return code 8 from the step.Is it because the file
was in use by another job?
2.what return code would I get if I use
TOL(ENQF) in the job ?
3.Also I want to know the waht TOL(ENQF)
does exactly?
4.If I use TOL(ENQF) would the file be copied and come with
different RC other than zero?What RC would that be?would it be 4?


Thanks,Vijay
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
PostPosted: Thu Mar 04, 2004 11:13 am    Post subject: Reply with quote
Vijay,

1. I guess the dataset contention caused the return code of 8.

2. Don't know

3. Check this link for a detailed explanation of TOLerate

4.For more information on TOL(ENQF), see Appendix B, "Data Integrity--Serialization" in topic B.0.

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


Joined: 09 May 2003
Posts: 131
Topics: 64
PostPosted: Thu Mar 04, 2004 7:55 pm    Post subject: Reply with quote
Thanks Kolusu for the link.I tried using TOLERATE(ENQ) i get RC 4 ,even if the file is used by another job and also the file gets copied.

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