View previous topic :: View next topic
|
Author |
Message |
dkarthikreddy
New User
Joined: 14 Mar 2008 Posts: 28 Location: bangalore
|
|
|
|
Hi,
Below is a jcl which executes REXX EXEC1. The parm to this rexx is a gdg base 'YOUR.GDG.BASE'.
The rexx is finding out the oldest version of the gdg base usign LISTDS command and then we have to copy the file into BACKUP dd name after the copy is complete we have to rename the file to OUTFILE.
We are unable to access BACKUP and OUTFILE from the rexx.
One way is to read all the records in oldest version of GDGBASE using EXECIO and then writing them on to the other files.
Is there any other way to do this?
Like COPY command or RENAME command?
Please help us how to access these dd names from within the REXX.
//JS020 EXEC PGM=IKJEFT01,
// PARM=('%EXEC1',
// 'YOUR.GDG.BASE'),
// REGION=4096K,
// DYNAMNBR=30
//SYSEXEC DD DSN=SYSEXEC concatenation,
// DISP=SHR
//OUTFILE DD DSN=YOUR.OUTPUT.TEMP.FILE,
// DISP=(NEW,CATLG,DELETE)
//BACKUP DD DSN=YOUR.BACKUP.FILE(+1),
// DISP=(NEW,CATLG,DELETE)
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY |
|
Back to top |
|
|
ofer71
Global Moderator
Joined: 27 Dec 2005 Posts: 2358 Location: Israel
|
|
|
|
You can invoke SORT/IEBGENER/IDCAMS REPRO etc. from within your REXX.
O. |
|
Back to top |
|
|
dkarthikreddy
New User
Joined: 14 Mar 2008 Posts: 28 Location: bangalore
|
|
|
|
HI,
Thanks for your Immediate reply.
We are planning to reuse this component. So the BACKUP and OUTFILE DSN names will change. Can IEBGENER or other programs handle that.
I suppose we will have to hard code the DSN if we use any of the above mentioned utilities.
Thanks |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
DFdss allows the use of relative GDS |
|
Back to top |
|
|
dkarthikreddy
New User
Joined: 14 Mar 2008 Posts: 28 Location: bangalore
|
|
|
|
Hi expat,
Could you please expand in detail what u r trying to explain, so that it would be much helpful for us.
Thanks |
|
Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006 Posts: 2546 Location: Silicon Valley
|
|
|
|
Quote: |
We are unable to access BACKUP and OUTFILE from the rexx. |
What kind of errors are you seeing when you try to access? |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
dkarthikreddy wrote: |
Hi expat,
Could you please expand in detail what u r trying to explain, so that it would be much helpful for us. Thanks |
DFdss is a tool for backup and restore of data. It can produce single or duplex output from one run.
Also consider ICETOOL to create multiple copies of a dataset.
Do you mean oldest as lowest generation or did you really mean the newest generation.
For Dfdss you can use a relative GDS in the control statements, and for ICETOOL you can specify the relative generation in the JCL.
These methods do assume that the number of generations in existance are constant. |
|
Back to top |
|
|
|