I'll try out your suggestion. Thanks.
________________________________ From: "McKown, John" <john.mck...@healthmarkets.com> To: IBM-MAIN@bama.ua.edu Sent: Tuesday, 5 June 2012 5:05 PM Subject: Re: JCL PROBLEM I'm fairly sure you need the REF=*.STEP01.PROC001.TAPE to be REF=*.PROC001.STEP01.TAPE -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets® 9151 Boulevard 26 . N. Richland Hills . TX 76010 (817) 255-3225 phone . john.mck...@healthmarkets.com . www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets® is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company®, Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM > -----Original Message----- > From: IBM Mainframe Discussion List > [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of John Dawes > Sent: Tuesday, June 05, 2012 4:02 PM > To: IBM-MAIN@bama.ua.edu > Subject: JCL PROBLEM > > 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 > > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
