Oh, and catalog all the datasets.  During a DR test, only the first
dataset was cataloged and it was on just the first volume, and only
the first tape was sent for the exercise.  Since there was no
cataloged datasets on the second tape, it was not sent.  The
application people had to Fedex the second tape to complete their
test.

On Tue, Jun 5, 2012 at 4:51 PM, Mark Zelden <m...@mzelden.com> wrote:
> Besides that issue, the refback should ALWAYS be to the previous step,
> not the first step.    If it ever goes to a 2nd volume you will get an
> abend.   Gee... it's been so long that I've dealt with anyone doing
> that I can't remember, but I think it's an A13 abend.
>
> Mark
> --
> Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
> mailto:m...@mzelden.com
> Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html
> Systems Programming expert at http://expertanswercenter.techtarget.com/
>
> On Tue, 5 Jun 2012 16:05:05 -0500, McKown, John 
> <john.mck...@healthmarkets.com> wrote:
>
>>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



-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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