Re: JCL PROBLEM - REVISITED
After the PROC001 statement, code //TAPE DD VOL=(,RETAIN,,35) to override just the volume operand on that DD statement. :: -Original Message- :: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On :: Behalf Of John Dawes :: Sent: Tuesday, June 05, 2012 3:50 PM :: To: IBM-MAIN@bama.ua.edu :: Subject: Re: JCL PROBLEM - REVISITED :: :: Since there is a VOL parm already coded how can I code the number of :: volumes e.g. VOL=(,,,35) ? The system default is only 5. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: JCL PROBLEM
Just a point which may not be obvious (at least it wasn't to me). The default of 5 tape volumes is hard coded only for non-SMS managed tapes. Truly! If you are using SMS managed tapes (in an automated or even manual library), then you can assign a default DATACLAS. In this DATACLAS, you can set the volume count to something else. We started having problems with some backups of files which had ballooned suddenly, which was causing a lot of abends due to exceeding tape volumes. There were simply too many JCL streams to update in a timely manner (change control). Since all our application tapes are in a VTS library, and so SMS managed, I simply changed our default DATACLAS which is assigned to virtual tapes to have a volume count of 110. Saved a ton of work. -- 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 5:22 PM To: IBM-MAIN@bama.ua.edu Subject: Re: JCL PROBLEM Thanks for the tip. If I need to code the vol parm e.g. VOL=(,,,35) if the output exceedes 5 vols (system default) how would I go about it since I already have a vol parm in the jcl. From: Mike Schwab mike.a.sch...@gmail.com To: IBM-MAIN@bama.ua.edu Sent: Tuesday, 5 June 2012 5:30 PM Subject: Re: JCL PROBLEM Might I suggest a RETAIN on the FIRST step and omit on the LAST step? On Tue, Jun 5, 2012 at 4:20 PM, John Dawes jhn_da...@yahoo.com.au wrote: John, You were spot on. Your suggestion worked. Thanks a million. Thanks to all who responded for my plea for help. -- 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 -- 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
Re: JCL PROBLEM
John, May I ask where you work? My friends in Australia may know some of the management folks at your site. Is there anything I can send to you to help your cause? What types of JCL issues do you typically have? May I ask what batch scheduler you use? Change management tool? .anything else you can tell me. Cheers, Mitch McCluhan -Original Message- From: McKown, John john.mck...@healthmarkets.com To: IBM-MAIN IBM-MAIN@bama.ua.edu Sent: Wed, Jun 6, 2012 5:15 am Subject: Re: JCL PROBLEM Just a point which may not be obvious (at least it wasn't to me). The default of 5 tape volumes is hard coded only for non-SMS managed tapes. Truly! If you are using SMS managed tapes (in an automated or even manual library), then you can assign a default DATACLAS. In this DATACLAS, you can set the volume count to something else. We started having problems with some backups of files which had ballooned suddenly, which was causing a lot of abends due to exceeding tape volumes. There were simply too many JCL streams to update in a timely manner (change control). Since all our application tapes are in a VTS library, and so SMS managed, I simply changed our default DATACLAS which is assigned to virtual tapes to have a volume count of 110. Saved a ton of work. -- 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 5:22 PM To: IBM-MAIN@bama.ua.edu Subject: Re: JCL PROBLEM Thanks for the tip. If I need to code the vol parm e.g. VOL=(,,,35) if the output exceedes 5 vols (system default) how would I go about it since I already have a vol parm in the jcl. From: Mike Schwab mike.a.sch...@gmail.com To: IBM-MAIN@bama.ua.edu Sent: Tuesday, 5 June 2012 5:30 PM Subject: Re: JCL PROBLEM Might I suggest a RETAIN on the FIRST step and omit on the LAST step? On Tue, Jun 5, 2012 at 4:20 PM, John Dawes jhn_da...@yahoo.com.au wrote: John, You were spot on. Your suggestion worked. Thanks a million. Thanks to all who responded for my plea for help. -- 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 -- 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
Re: JCL PROBLEM
Where I work is in all my sig lines. Doesn't matter, if you're thinking of anything that costs money. We aren't spending any more than we currently do. And we may actually get more budget cuts in 2013. Our main OEM vendor is CA. We don't normally have JCL problems, the one I mentioned was endemic due to converting from BMC's Data Accelerator compression to SMS compression and its effect on CA-Faver backups. The z/OS system is generally moribund. -- 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 Mitch Sent: Wednesday, June 06, 2012 9:46 AM To: IBM-MAIN@bama.ua.edu Subject: Re: JCL PROBLEM John, May I ask where you work? My friends in Australia may know some of the management folks at your site. Is there anything I can send to you to help your cause? What types of JCL issues do you typically have? May I ask what batch scheduler you use? Change management tool? .anything else you can tell me. Cheers, Mitch McCluhan -Original Message- From: McKown, John john.mck...@healthmarkets.com To: IBM-MAIN IBM-MAIN@bama.ua.edu Sent: Wed, Jun 6, 2012 5:15 am Subject: Re: JCL PROBLEM Just a point which may not be obvious (at least it wasn't to me). The default of 5 tape volumes is hard coded only for non-SMS managed tapes. Truly! If you are using SMS managed tapes (in an automated or even manual library), then you can assign a default DATACLAS. In this DATACLAS, you can set the volume count to something else. We started having problems with some backups of files which had ballooned suddenly, which was causing a lot of abends due to exceeding tape volumes. There were simply too many JCL streams to update in a timely manner (change control). Since all our application tapes are in a VTS library, and so SMS managed, I simply changed our default DATACLAS which is assigned to virtual tapes to have a volume count of 110. Saved a ton of work. -- 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 5:22 PM To: IBM-MAIN@bama.ua.edu Subject: Re: JCL PROBLEM Thanks for the tip. If I need to code the vol parm e.g. VOL=(,,,35) if the output exceedes 5 vols (system default) how would I go about it since I already have a vol parm in the jcl. From: Mike Schwab mike.a.sch...@gmail.com To: IBM-MAIN@bama.ua.edu Sent: Tuesday, 5 June 2012 5:30 PM Subject: Re: JCL PROBLEM Might I suggest a RETAIN on the FIRST step and omit on the LAST step? On Tue, Jun 5, 2012 at 4:20 PM, John Dawes jhn_da...@yahoo.com.au wrote: John, You were spot on. Your suggestion worked. Thanks a million. Thanks to all who responded for my plea for help. -- 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 -- 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
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..XX.VSOURCE.XX, //TAPE DD DSN=BKUP.DISTR.PRDDLY.VSOURCE..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
Re: JCL PROBLEM
At what step do you get this error? PROC001, PROC003, etc... Lizette -Original Message- From: John Dawes jhn_da...@yahoo.com.au Sent: Jun 5, 2012 2:01 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..XX.VSOURCE.XX, //TAPE DD DSN=BKUP.DISTR.PRDDLY.VSOURCE..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
Re: JCL PROBLEM
At PROC002 //STEP01.TAPE From: Lizette Koehler stars...@mindspring.com To: IBM-MAIN@bama.ua.edu Sent: Tuesday, 5 June 2012 5:06 PM Subject: Re: JCL PROBLEM At what step do you get this error? PROC001, PROC003, etc... Lizette -Original Message- From: John Dawes jhn_da...@yahoo.com.au Sent: Jun 5, 2012 2:01 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..XX.VSOURCE.XX, //TAPE DD DSN=BKUP.DISTR.PRDDLY.VSOURCE..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
Re: JCL PROBLEM
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..XX.VSOURCE.XX, //TAPE DD DSN=BKUP.DISTR.PRDDLY.VSOURCE..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
Re: JCL PROBLEM
I agree. Your names are confusing. PROC001 is the step name. STEP01 is the proc step name. (The name of the step in the proc.) Thank you and have a Terrific day! Jonathan Goossen, DTM ACT Mainframe Storage Group Personal: 651-361-4541 Department Support Line: 651-361- For help with communication and leadership skills checkout Woodwinds Toastmasters. IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on 06/05/2012 04:05:05 PM: From: McKown, John john.mck...@healthmarkets.com To: IBM-MAIN@bama.ua.edu Date: 06/05/2012 04:05 PM Subject: Re: JCL PROBLEM Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu 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 //*TAPEDD DSN=BKUP..XX.VSOURCE.XX, //TAPE DD DSN=BKUP.DISTR.PRDDLY.VSOURCE..D050612.TEST, //DSORG=PS,TRTCH=COMP,UNIT=MAN3590, //VOL=(,RETAIN),DISP=(NEW,CATLG,DELETE), //LABEL=(LB,SL) //SYSPRINT DD SYSOUT=* //SYSINDD 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 This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have
Re: JCL PROBLEM
That's why we use JSnnn for JobStep and PSnnn for ProcStep in our shop. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 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(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), 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 Jonathan Goossen Sent: Tuesday, June 05, 2012 4:15 PM To: IBM-MAIN@bama.ua.edu Subject: Re: JCL PROBLEM I agree. Your names are confusing. PROC001 is the step name. STEP01 is the proc step name. (The name of the step in the proc.) Thank you and have a Terrific day! Jonathan Goossen, DTM ACT Mainframe Storage Group Personal: 651-361-4541 Department Support Line: 651-361- For help with communication and leadership skills checkout Woodwinds Toastmasters. IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on 06/05/2012 04:05:05 PM: From: McKown, John john.mck...@healthmarkets.com To: IBM-MAIN@bama.ua.edu Date: 06/05/2012 04:05 PM Subject: Re: JCL PROBLEM Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu 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(r) 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(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), 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 //*TAPEDD DSN=BKUP..XX.VSOURCE.XX, //TAPE DD DSN=BKUP.DISTR.PRDDLY.VSOURCE..D050612.TEST, //DSORG=PS,TRTCH=COMP,UNIT=MAN3590, //VOL=(,RETAIN),DISP=(NEW,CATLG,DELETE), //LABEL=(LB,SL) //SYSPRINT DD SYSOUT=* //SYSINDD
Re: JCL PROBLEM
John, You were spot on. Your suggestion worked. Thanks a million. Thanks to all who responded for my plea for help. 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..XX.VSOURCE.XX, //TAPE DD DSN=BKUP.DISTR.PRDDLY.VSOURCE..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
Re: JCL PROBLEM
Might I suggest a RETAIN on the FIRST step and omit on the LAST step? On Tue, Jun 5, 2012 at 4:20 PM, John Dawes jhn_da...@yahoo.com.au wrote: John, You were spot on. Your suggestion worked. Thanks a million. Thanks to all who responded for my plea for help. -- 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
Re: JCL PROBLEM
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..XX.VSOURCE.XX, //TAPE DD DSN=BKUP.DISTR.PRDDLY.VSOURCE..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
Re: JCL PROBLEM
Thanks for the tip. If I need to code the vol parm e.g. VOL=(,,,35) if the output exceedes 5 vols (system default) how would I go about it since I already have a vol parm in the jcl. From: Mike Schwab mike.a.sch...@gmail.com To: IBM-MAIN@bama.ua.edu Sent: Tuesday, 5 June 2012 5:30 PM Subject: Re: JCL PROBLEM Might I suggest a RETAIN on the FIRST step and omit on the LAST step? On Tue, Jun 5, 2012 at 4:20 PM, John Dawes jhn_da...@yahoo.com.au wrote: John, You were spot on. Your suggestion worked. Thanks a million. Thanks to all who responded for my plea for help. -- 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: JCL PROBLEM - REVISITED
Since there is a VOL parm already coded how can I code the number of volumes e.g. VOL=(,,,35) ? The system default is only 5. From: John Dawes jhn_da...@yahoo.com.au To: IBM-MAIN@bama.ua.edu Sent: Tuesday, 5 June 2012 6:21 PM Subject: Re: JCL PROBLEM Thanks for the tip. If I need to code the vol parm e.g. VOL=(,,,35) if the output exceedes 5 vols (system default) how would I go about it since I already have a vol parm in the jcl. From: Mike Schwab mike.a.sch...@gmail.com To: IBM-MAIN@bama.ua.edu Sent: Tuesday, 5 June 2012 5:30 PM Subject: Re: JCL PROBLEM Might I suggest a RETAIN on the FIRST step and omit on the LAST step? On Tue, Jun 5, 2012 at 4:20 PM, John Dawes jhn_da...@yahoo.com.au wrote: John, You were spot on. Your suggestion worked. Thanks a million. Thanks to all who responded for my plea for help. -- 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 -- 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
Re: JCL PROBLEM
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..XX.VSOURCE.XX, //TAPE DD DSN=BKUP.DISTR.PRDDLY.VSOURCE..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
Re: JCL PROBLEM
The keywords go after the positional parameters. On Tue, Jun 5, 2012 at 5:21 PM, John Dawes jhn_da...@yahoo.com.au wrote: Thanks for the tip. If I need to code the vol parm e.g. VOL=(,,,35) if the output exceedes 5 vols (system default) how would I go about it since I already have a vol parm in the jcl. -- 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
Re: JCL Problem...
I may be missing something, but I'd go for something like: //STEP01 EXEC PGM=FOO //SYSPRINT DD DISP=(NEW,PASS)...etc... //STEP02 EXEC PGM=BA //SYSIN DD DSN=*.STEP01.SYSPRINT,DISP=(OLD,DELETE)... //SYSPRINT DD SYSOUT=* John Compton Phone Cork: +353 (0)21 231 4641; Phone VOIP: 214-775-3641 -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Michael Knigge Sent: 22 October 2008 10:37 To: IBM-MAIN@BAMA.UA.EDU Subject: JCL Problem... All, I have a utility that outputs a string to SYSPRINT (but that can be changed). Now I need to pass this string via SYSIN (or PARM) together with some other parameters to a second utility. A little pseudo-sample: //* //* IMAGINE FOO WILL OUTPUT AN IP-ADDRESS - BUT THE ADDRESS //* IS OF COURSE NOT KNOWN... //* //STEP01 EXEC PGM=FOO //SYSPRINT DD SYSOUT=* //* //* NOW I NEED TO EXECUTE A COMMAND THAT CONTAINS //* THE IP-ADDRESS //STEP02 EXEC PGM=BA,PARM='PING the.ip.addr.here' . OR ... //STEP02 EXEC PGM=BA //SYSIN DD * PING the.ip.addr.here //SYSPRINT DD SYSOUT=* Any ideas how to solve this problem? My first idea was to pass the SYSPRINT from STEP01 to a following STEP that issues an EDIT-Macro that changes the contents to my needs (BTW, how to do this?). The new SYSPRINT is then passed to the PING STEP. Of yourse this is just simplified just to show you what I need. My real case has nothing to do with IP-Adresses and PING and that stuff, but this sample is (I think so) easy to understand... Thank you in advance Bye, Michael -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JCL Problem...
Is there any reason why you aren't pointing SYSPRINT (or whatever) at a temporary (or permanent) file, and using that file as the SYSIN dataset for STEP02? For what reason do you *need* the SYSIN data to be instream? -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Michael Knigge Sent: 22 October 2008 10:37 To: IBM-MAIN@BAMA.UA.EDU Subject: JCL Problem... All, I have a utility that outputs a string to SYSPRINT (but that can be changed). Now I need to pass this string via SYSIN (or PARM) together with some other parameters to a second utility. A little pseudo-sample: //* //* IMAGINE FOO WILL OUTPUT AN IP-ADDRESS - BUT THE ADDRESS //* IS OF COURSE NOT KNOWN... //* //STEP01 EXEC PGM=FOO //SYSPRINT DD SYSOUT=* //* //* NOW I NEED TO EXECUTE A COMMAND THAT CONTAINS //* THE IP-ADDRESS //STEP02 EXEC PGM=BA,PARM='PING the.ip.addr.here' . OR ... //STEP02 EXEC PGM=BA //SYSIN DD * PING the.ip.addr.here //SYSPRINT DD SYSOUT=* Any ideas how to solve this problem? My first idea was to pass the SYSPRINT from STEP01 to a following STEP that issues an EDIT-Macro that changes the contents to my needs (BTW, how to do this?). The new SYSPRINT is then passed to the PING STEP. Of yourse this is just simplified just to show you what I need. My real case has nothing to do with IP-Adresses and PING and that stuff, but this sample is (I think so) easy to understand... Thank you in advance Bye, Michael -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html This e-mail has come from Experian, the only business to have been twice named the UK's 'Business of the Year’ === Information in this e-mail and any attachments is confidential, and may not be copied or used by anyone other than the addressee, nor disclosed to any third party without our permission. There is no intention to create any legally binding contract or other binding commitment through the use of this electronic communication unless it is issued in accordance with the Experian Limited standard terms and conditions of purchase or other express written agreement between Experian Limited and the recipient. Although Experian has taken reasonable steps to ensure that this communication and any attachments are free from computer virus, you are advised to take your own steps to ensure that they are actually virus free. Companies Act information: Registered name: Experian Limited Registered office: Talbot House, Talbot Street, Nottingham NG80 1TH Place of registration: England and Wales Registered number: 653331 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JCL Problem...
On Wed, 22 Oct 2008 11:37:12 +0200, Michael Knigge [EMAIL PROTECTED] wrote: All, I have a utility that outputs a string to SYSPRINT (but that can be changed). Now I need to pass this string via SYSIN (or PARM) together with some other parameters to a second utility. A little pseudo-sample: //* //* IMAGINE FOO WILL OUTPUT AN IP-ADDRESS - BUT THE ADDRESS //* IS OF COURSE NOT KNOWN... //* //STEP01 EXEC PGM=FOO //SYSPRINT DD SYSOUT=* //* //* NOW I NEED TO EXECUTE A COMMAND THAT CONTAINS //* THE IP-ADDRESS //STEP02 EXEC PGM=BA,PARM='PING the.ip.addr.here' . OR ... //STEP02 EXEC PGM=BA //SYSIN DD * PING the.ip.addr.here //SYSPRINT DD SYSOUT=* Any ideas how to solve this problem? My first idea was to pass the SYSPRINT from STEP01 to a following STEP that issues an EDIT-Macro that changes the contents to my needs (BTW, how to do this?). The new SYSPRINT is then passed to the PING STEP. Of yourse this is just simplified just to show you what I need. My real case has nothing to do with IP-Adresses and PING and that stuff, but this sample is (I think so) easy to understand... Thank you in advance Bye, Michael A REXX or CLIST EXEC (or many other programming options) that parses your SYSPRINT (passed from the first step in a dataset, not SYSOUT -- or put to a dataset, the gener to SYSOUT if someone needs this info), which in turn generates a temp (or permanent, transient/temporary - for restart purposes) dataset containing your PING (or whatever) command which gets executed in a subsequent step. You may also be able to use ICETOOL/DFSORT to parse the SYSPRINT output and generate your command. Scott Barry SBBWorks, Inc. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JCL Problem...
On Wed, 22 Oct 2008 07:18:58 -0500, Scott Barry wrote: On Wed, 22 Oct 2008 11:37:12 +0200, Michael Knigge wrote: //* //* IMAGINE FOO WILL OUTPUT AN IP-ADDRESS - BUT THE ADDRESS //* IS OF COURSE NOT KNOWN... //* //STEP01 EXEC PGM=FOO //SYSPRINT DD SYSOUT=* //* //* NOW I NEED TO EXECUTE A COMMAND THAT CONTAINS //* THE IP-ADDRESS //STEP02 EXEC PGM=BA,PARM='PING the.ip.addr.here' A REXX or CLIST EXEC (or many other programming options) that parses your SYSPRINT (passed from the first step in a dataset, not SYSOUT -- or put to a dataset, the gener to SYSOUT if someone needs this info), which in turn generates a temp (or permanent, transient/temporary - for restart purposes) dataset containing your PING (or whatever) command which gets executed in a subsequent step. EVANGELISM This is extraorinarily easy to do in z/OS Unix with a shell command using command substitution: PING $(FOO) Consider that as an alternative./EVANGELISM How about: //STEP02 EXEC PGM=IKJEFT01 //SYSTSIN DD* PING - // DDDISP=OLD,DSN=*.STEP01.SYSPRINT -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JCL Problem...
Flint, Mike schrieb: Is there any reason why you aren't pointing SYSPRINT (or whatever) at a temporary (or permanent) file, and using that file as the SYSIN dataset for STEP02? For what reason do you *need* the SYSIN data to be instream? I don't really need it instream - it was just to clarify that I need to modify the output to SYSPRINT from the first STEP (put something around). Bye, Michael -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html