G'Day,
 
I am having a problem (jcl error) trying to run this job.  The object is to 
have all the backups written out to a 3592 tape.
//***************************************************************
//PROC001 EXEC FCBPRDXX,TARGET='FQ8A00',SOURCE='PAGE01',LB='1'   
//PROC002 EXEC FCBPRDXX,TARGET='FQ8A01',SOURCE='CSYS01',LB='2'   
//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)        
//PROC003 EXEC FCBPRDXX,TARGET='FQ8A02',SOURCE='CSYS02',LB='3'   
//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)        
//PROC004 EXEC FCBPRDXX,TARGET='FQ8A03',SOURCE='CSYS03',LB='4'   
//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)        
//PROC005 EXEC FCBPRDXX,TARGET='FQ8A04',SOURCE='CSYS04',LB='5'   
//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)        
//PROC006 EXEC FCBPRDXX,TARGET='FQ8A05',SOURCE='CSYS05',LB='6'   
//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)        
//PROC007 EXEC FCBPRDXX,TARGET='FQ8A06',SOURCE='CSYS06',LB='7'   
//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)        
//PROC008 EXEC FCBPRDXX,TARGET='FQ8A07',SOURCE='CSYS07',LB='8'   
//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)        
//PROC009 EXEC FCBPRDXX,TARGET='FQ8A08',SOURCE='PAGE02',LB='9'   
//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)        
//PROC010 EXEC FCBPRDXX,TARGET='FQ8A09',SOURCE='HFSC01',LB='10'  
//STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)        
 
This is the proc:
 
//FCBPRDXX PROC                                             
//*                                                         
//STEP01  EXEC PGM=ADRDSSU PARM='TYPRUN=NORUN'              
//DISK     DD VOL=SER=&TARGET,DISP=SHR,UNIT=3390            
//*TAPE    DD DSN=BKUP.XXXX.XXXXXX.V&SOURCE.XXXXXX,         
//TAPE     DD DSN=BKUP.DISTR.PRDDLY.V&SOURCE..D050612.TEST, 
//            DSORG=PS,TRTCH=COMP,UNIT=MAN3590,             
//            VOL=(,RETAIN),DISP=(NEW,CATLG,DELETE),        
//            LABEL=(&LB,SL)                                
//SYSPRINT DD SYSOUT=*                                      
//SYSIN    DD DISP=SHR,DSN=SYS3.FLASHCPY.PROCLIB(#FCCOPY)   
//*                                                         
 
The message I get is :
IEF645I INVALID REFERBACK IN THE REF SUBPARAMETER OF THE VOLUME FIELD
 
I cannot spot my error.  Can someone help me out?
 
Thanks in advance.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN

Reply via email to