View previous topic :: View next topic
|
Author |
Message |
rahulbank
New User
Joined: 25 Sep 2008 Posts: 66 Location: Bengaluruuuuuu
|
|
|
|
This was the original question:
Could any one let me know how to copy the contents of all the members inside the PDS(without listing out the members inside the PDS in the job) to a flat file.
My intention was just to help the person who has asked the original question incase he has still not found the solution to this. |
|
Back to top |
|
|
rahulbank
New User
Joined: 25 Sep 2008 Posts: 66 Location: Bengaluruuuuuu
|
|
|
|
Sorry Now I realize the oringinal question was asked way back in time...
Apologies.... |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
edit the pds member, enter 'A' at the line after which you want the new data positioned and enter COPY on the commandline. Depress ENTER.
fill out the panel. |
|
Back to top |
|
|
Sagar_mainframe
New User
Joined: 07 Jun 2008 Posts: 34 Location: Harrisburg, Pennsylvania
|
|
|
|
Actually I tried using IDCAMS as follows:
Code: |
//PS010 EXEC PGM=IDCAMS
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//INFILE DD DSN=PRGSD1.PCDATF.ADHERIS.TEMP,DISP=SHR
//OUTFILE DD DSN=PRGSD1.CTL.LIB(PCAD004Z),
// DISP=(NEW,CATLG,DELETE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000),
// UNIT=CARDA,
// SPACE=(CYL,(500,500),RLSE) |
but it says 'PRGSD1.CTL.LIB' already exists.
I want tp copy the contents of flat file into the member PCAD004Z, |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
Use DISP=OLD for guaranteed results, or DISP=SHR if you're sure nobody else can be updating the PDS at the same time. DISP applies to the data set, not to the member -- as many have discovered the hard way by attempting to code DISP=(OLD,DELETE) to get rid of a member (the data set goes away instead). |
|
Back to top |
|
|
Sagar_mainframe
New User
Joined: 07 Jun 2008 Posts: 34 Location: Harrisburg, Pennsylvania
|
|
|
|
Thanks a lot to all of you!!!!
It's working with DISP=OLD, Just being more specific,you have to give the same length of the PDS (as well as PDS member) as that of the flat file. |
|
Back to top |
|
|
|