Since the OP did not explain exactly what he wanted to do, only that he was
using the examples in the DFP manual, and everyone else was throwing out
various processes, I just thought I would toss in TSO XMIT/RECEIVE.
If the intent is backup and transfer the data to another location, this is a
good tool.
And I was hoping the OP would then clarify what exactly was the requirement.
>From the posting he was using example 8 and 9
>From the manual: Example 8 This uses an UNLOADED PDS to load back into a PDS
//LOAD JOB ...
//STEPA EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=A
//SYSUT1 DD DSNAME=UNLOADSET,UNIT=tape,LABEL=(,SL),
// VOL=SER=TAPE01,DISP=OLD
//SYSUT2 DD DSNAME=DATASET4,UNIT=disk,VOL=SER=2222222,
// DISP=(NEW,KEEP),SPACE=(CYL,(10,5,10))
//SYSUT3 DD DSN=TEMP1,UNIT=disk,VOL=SER=111111,
// DISP=(NEW,DELETE),SPACE=(80,(15,1))
//SYSIN DD DUMMY
/*
Example 9 members are selected, excluded, unloaded, loaded, and copied.
Processing will occur as follows:
unload, excluding members
unload, selecting members
load and copy to merge members
//COPY JOB ...
//STEP EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=A
//PDS1 DD DSNAME=ACCOUNTA,UNIT=disk,VOL=SER=333333,
// DISP=OLD
//PDS2 DD DSNAME=ACCOUNTB,UNIT=disk,VOL=SER=333333,
// DISP=OLD
//SEQ1 DD DSNAME=SAVAC,UNIT=disk,VOL=SER=333333,
// DISP=(NEW,KEEP),SPACE=(CYL,(5,2))
//SEQ2 DD DSNAME=SAVACB,UNIT=tape,VOL=SER=T01911,
// DISP=(NEW,KEEP),LABEL=(,SL)
//NEWUP DD DSNAME=NEWACC,UNIT=tape,VOL=SER=T01219,
// DISP=OLD,LABEL=(,SL)
//MERGE DD DSNAME=ACCUPDAT,UNIT=disk,VOL=SER=222222,
// DISP=OLD
//SYSUT3 DD DSNAME=TEMP1,VOL=SER=666666,UNIT=disk,
// DISP=(NEW,DELETE),SPACE=(80,(1,1))
//SYSUT4 DD DSNAME=TEMP2,VOL=SER=666666,UNIT=disk,
// DISP=(NEW,DELETE),SPACE=(256,(1,1)),DCB=(KEYLEN=8)
//SYSIN DD *
COPY OUTDD=SEQ1,INDD=PDS1
EXCLUDE MEMBER=(D,C)
COPY OUTDD=SEQ2,INDD=PDS2
SELECT MEMBER=(A,K)
COPY OUTDD=MERGE,INDD=((NEWUP,R),PDS1,PDS2)
EXCLUDE MEMBER=A
/*
So it would help if there is some clarification of what was wanted.
SORT/ICETOOL, IEBGENER, IEBUPDTE, REXX, CLIST, COBOL, and so on I think could
confuse the OP and his intent.
I am thinking he is trying to create a process that will update his LRS/VPS
keys when they change via REXX. Maybe a backup and replace type function. In
which case, more details and the list will surely provide excellent coding
techniques.
And if he has not done so, he could also join and post to the TSO-REXX list and
get even more coding samples to do what he is attempting to do. Which can be
done at this website at the bottom of the webpage
http://www2.marist.edu/htbin/wlvindex?TSO-REXX
Lizette
> -----Original Message-----
> From: IBM Mainframe Discussion List [mailto:[email protected]] On
> Behalf Of Elardus Engelbrecht
> Sent: Thursday, March 20, 2014 4:09 AM
> To: [email protected]
> Subject: Re: Help with IEBCOPY?
>
> J R wrote:
>
> >Seriously?
>
> Careful, Lizette must be serious. It is hard to argue with a clever lady. ;-D
>
> After all, she was the ONLY one who spotted the correct message prefix after
> all
> this discussion. ;-D
>
> I wish I was THAT attentive. :-D
>
> Perhaps she can explain her post.
>
> Groete / Greetings
> Elardus Engelbrecht
>
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
