Perhaps a little closer?
//STEP1 EXEC PGM=FDRCOPY,REGION=8192K
//SYSPRINT DD SYSOUT=T
//SYSPRIN1 DD SYSOUT=T
//SYSUDUMP DD SYSOUT=T
//DISK1 DD UNIT=SYSDA,DISP=SHR,VOL=SER=ID2P01
//DISK2 DD UNIT=SYSDA,DISP=SHR,VOL=SER=ID2P02
//DISK3 DD UNIT=SYSDA,DISP=SHR,VOL=SER=ID2P03
//DISK4 DD UNIT=SYSDA,DISP=SHR,VOL=SER=ID2P04
//DISK5 DD UNIT=SYSDA,DISP=SHR,VOL=SER=ID2P05
//DISK6 DD UNIT=SYSDA,DISP=SHR,VOL=SER=ID2P06
//SYSIN DD *
COPY TYPE=DSF
EXCLUDE DSN=ID.DB.MA.PROD.**.NEW
EXCLUDE DSN=ID.DB.MA.PROD.**.OLD
EXCLUDE DSN=ID.DB.MA.PROD.**.SAVE
EXCLUDE DSN=ID.DB.MA.PROD.UDI**
SELECT DSN=ID.DB.MA.PROD.**
NEWVOL=(ID2T01,ID2T02,ID2T03,ID2T04,ID2T05,ID2T06)
NEWNAME=ID.DB.MA.TEST.*
I was thinking there was a SIMULATE mode with FDR, but I can only find it
with COMPAKTOR and FDRREORG JCL.
On Tue, Jan 3, 2017 at 8:25 PM, Steve Horein <[email protected]> wrote:
> It's been about a decade or so since I've supported DASD, but I found this
> JCL that uses FDRCOPY that may help:
>
> //STEP1 EXEC PGM=FDRCOPY,REGION=8192K
> //SYSPRINT DD SYSOUT=T
> //SYSPRIN1 DD SYSOUT=T
> //SYSUDUMP DD SYSOUT=T
> //DISK1 DD UNIT=SYSDA,DISP=SHR,VOL=SER=DSKB84
> //SYSIN DD *
> COPY TYPE=DSF
> SELECT DSN=DB2PRD.DSNDBC.BDP*
> NEWVOL=(DB2T5*,DB2T6*,DB2T7*)
> NEWNAME=DB2TST.*
>
>
>
> On Tue, Jan 3, 2017 at 1:11 PM, Hardee, Chuck <
> [email protected]> wrote:
>
>> Thanks Nick, I'll try to be as detailed as I can.
>>
>> I have 235 production datasets across 6 packs. I needed to restore the
>> datasets to 6 test packs.
>> The datasets are of the format: ID.DB.MA.PROD.AMPSYOVY.PX001001
>> The difference in the datasets are that the last 6 digits change. The
>> first 3 digits are a "family" id and the last 3 digits are a sequence
>> number within the family.
>>
>> The naming for the TEST environment would be
>> ID.DB.MA.TEST.AMPSYOVY.PX001001
>> The "family" and sequencing would remain the same.
>>
>> So, in a nutshell, the files are to be restored from 6 prod packs to 6
>> test packs changing the PROD to TEST.
>> The packs are of a format ID2P01 thru 06 and ID2T01 thru 06.
>>
>> This is what I fed to FDR:
>>
>> //SYSIN DD *
>> RESTORE TYPE=FDR,
>> ENQERR=NO,
>> ACTMESS=NO,
>> DATA=USED,
>> SELTERR=NO,
>> CONFMESS=NO
>> EXCLUDE DSN=IDMS.PROD.HOLDER.SYS1.VTOCIX**
>> EXCLUDE DSN=IDMS.PROD.HOLDER.SYS1.VVDS**
>> EXCLUDE DSN=ID.DB.MA.PROD.**.NEW
>> EXCLUDE DSN=ID.DB.MA.PROD.**.OLD
>> EXCLUDE DSN=ID.DB.MA.PROD.**.SAVE
>> EXCLUDE DSN=ID.DB.MA.PROD.UDI**
>> SELECT DSN=ID.DB.MA.PROD**,NEWI=...TEST
>> /*
>>
>> After the restore was complete, the existing files
>> ID.DB.MA.TEST.AMPSYOVY.PX001001, etc were deleted, but the catalog
>> entries remained and the production files were placed on the test volumes
>> but the PROD was not changed to TEST.
>>
>> Additionally, there were also 6 "rogue" files on 2 of the prod packs,
>> their naming was ID.DB.MA.PROD.CAS02001.SAVE, etc.
>> These files were also restored, but to my way of thinking, the EXCLUDE
>> for the ID.DB.MA.PROD.**.SAVE should have caused them to be excluded from
>> being restored to the test packs.
>>
>> So, what am I missing here?
>> First, as a file name is run thru the list of exclude and select parms,
>> the file name ending in SAVE should have been eliminated, right?
>> Then, if a file makes it past the excludes, if it matches the DSN+ value,
>> it should be restored, but the PROD node in the name should have been
>> changed to TEST, right?
>>
>> Also, the last couple of lines in the output from the restore process are
>> this:
>>
>> FDR316** FDR DID NOT FIND REQUESTED DSN/G=ID.DB.MA.PROD**
>> FDR999 FDR SUCCESSFULLY COMPLETED
>>
>> I'm sure these lines say it all, but to me, they don't say a thing.
>>
>> Let me say right now, I inherited this job stream from someone who is no
>> longer here so I cannot say with absolute certainty that this ran
>> successfully last year.
>>
>> Thanks for taking the time to look at this.
>>
>> Chuck
>>
>>
>> Charles (Chuck) Hardee
>> Senior Systems Engineer/Database Administration
>> EAS Information Technology
>>
>> Thermo Fisher Scientific
>> 300 Industry Drive | Pittsburgh, PA 15275
>> Phone +1 (724) 517-2633 | Mobile +1 (412) 877-2809 | FAX: +1 (412)
>> 490-9230
>> [email protected] | www.thermofisher.com
>>
>> WORLDWIDE CONFIDENTIALITY NOTE: Dissemination, distribution or copying of
>> this e-mail or the information herein by anyone other than the intended
>> recipient, or an employee or agent of a system responsible for delivering
>> the message to the intended recipient, is prohibited. If you are not the
>> intended recipient, please inform the sender and delete all copies.
>>
>> -----Original Message-----
>> From: IBM Mainframe Discussion List [mailto:[email protected]] On
>> Behalf Of Icke, Nick
>> Sent: Tuesday, January 03, 2017 1:58 PM
>> To: [email protected]
>> Subject: Re: FDR List
>>
>> Whats the prob you are encountering and can you supply the exec pack, I
>> maybe able to help
>>
>> Ta
>>
>> Nick
>>
>> -----Original Message-----
>> From: IBM Mainframe Discussion List [mailto:[email protected]] On
>> Behalf Of Hardee, Chuck
>> Sent: 03 January 2017 18:56
>> To: [email protected]
>> Subject: FDR List
>>
>> Does anyone know if there is an FDR list out there somewhere?
>> If there isn't one, is anyone willing to offer insight on an FDR RESTORE
>> problem I am having?
>>
>> Thanks,
>> Chuck
>>
>> Charles (Chuck) Hardee<mailto:[email protected]>
>> Senior Systems Engineer/Database Administration EAS Information
>> Technology<mailto:DBA%20Engineering%20-%20DB2_IDMS>
>>
>> Thermo Fisher Scientific
>> 300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 |
>> Mobile +1 (412) 877-2809 | FAX: +1 (412) 490-9230
>> [email protected]<mailto:[email protected]> |
>> www.thermofisher.com
>>
>> WORLDWIDE CONFIDENTIALITY NOTE: Dissemination, distribution or copying of
>> this e-mail or the information herein by anyone other than the intended
>> recipient, or an employee or agent of a system responsible for delivering
>> the message to the intended recipient, is prohibited. If you are not the
>> intended recipient, please inform the sender and delete all copies.
>>
>>
>> ----------------------------------------------------------------------
>> For IBM-MAIN subscribe / signoff / archive access instructions, send
>> email to [email protected] with the message: INFO IBM-MAIN
>>
>> ----------------------------------------------------------------------
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to [email protected] with the message: INFO IBM-MAIN
>>
>> ----------------------------------------------------------------------
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to [email protected] with the message: INFO IBM-MAIN
>>
>
>
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
