Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

How to copy the contents of a PDS to PS File
Goto page 1, 2  Next
 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
NAGARJUN CARALAPATI

New User


Joined: 09 Oct 2007
Posts: 22
Location: chennai.India

PostPosted: Tue Oct 16, 2007 4:40 pm    Post subject: How to copy the contents of a PDS to PS File
Reply with quote

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.

Where the flat file as ouput should consist of all the data inside the PDS members to be concatenated inside.

Could any one come up with a sample job to do this !!
Back to top
View user's profile Send private message

superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Tue Oct 16, 2007 4:47 pm    Post subject: Reply to: HOW TO COPY THE CONTENTS OF PDS MEMBERS TO A FLAT
Reply with quote

9.0 IEBPTPCH (Print-Punch) Program from the DFSMS/MVS V1R5 Utilities.

1.35 PRINTDS Command from the z/OS V1R7.0 TSO/E Command Reference.
Back to top
View user's profile Send private message
NAGARJUN CARALAPATI

New User


Joined: 09 Oct 2007
Posts: 22
Location: chennai.India

PostPosted: Tue Oct 16, 2007 4:52 pm    Post subject:
Reply with quote

Could you please send me a sample program which uses IEBPTPCH.
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Tue Oct 16, 2007 5:48 pm    Post subject: Reply to: HOW TO COPY THE CONTENTS OF PDS MEMBERS TO A FLAT
Reply with quote

There's one here in this previous topic.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Tue Oct 16, 2007 6:19 pm    Post subject:
Reply with quote

why not use the 3.3 panel?
Back to top
View user's profile Send private message
NAGARJUN CARALAPATI

New User


Joined: 09 Oct 2007
Posts: 22
Location: chennai.India

PostPosted: Tue Oct 16, 2007 6:33 pm    Post subject:
Reply with quote

3.3 is for copy 'pds to pds' or 'ps to ps' but not for 'all pds member to a single ps'.
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Tue Oct 16, 2007 6:37 pm    Post subject: Reply to: HOW TO COPY THE CONTENTS OF PDS MEMBERS TO A FLAT
Reply with quote

Huh?? icon_confused.gif

ISPF 3.3 is "3 Move/Copy Move, or copy members or data sets", which can be PDS to PDS, PDS to SEQ, SEQ to PDS.
Back to top
View user's profile Send private message
Aaru

Senior Member


Joined: 03 Jul 2007
Posts: 1288
Location: Chennai, India

PostPosted: Tue Oct 16, 2007 6:38 pm    Post subject: Reply to: HOW TO COPY THE CONTENTS OF PDS MEMBERS TO A FLAT
Reply with quote

naga,

Quote:
3.3 is for copy 'pds to pds' or 'ps to ps' but not for 'all pds member to a single ps'.


Are you sure?

Quote:
dbzTHEdinosauer wrote:

why not use the 3.3 panel?


Yes, 3.3 can be used to copy PDS to PS.
Back to top
View user's profile Send private message
NAGARJUN CARALAPATI

New User


Joined: 09 Oct 2007
Posts: 22
Location: chennai.India

PostPosted: Tue Oct 16, 2007 6:46 pm    Post subject:
Reply with quote

Thanks kevin,
3.3 option worked. I was able to copy all the content of the PDS members to a single flat file.


Thank you !!!!!!
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Tue Oct 16, 2007 6:50 pm    Post subject: Reply to: HOW TO COPY THE CONTENTS OF PDS MEMBERS TO A FLAT
Reply with quote

Quote:
3.3 is for copy 'pds to pds' or 'ps to ps' but not for 'all pds member to a single ps'.


WRONG, I just tested it,

it works, it will simply copy to a sequential datasets all the members selected - without any separator.

Just like concatenating each member as a dd of a IEBGENER step

It might be useless if used for pds containing source programs,
but if the pds contained just data to be concatenated, it will work
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Tue Oct 16, 2007 6:51 pm    Post subject: Reply to: HOW TO COPY THE CONTENTS OF PDS MEMBERS TO A FLAT
Reply with quote

I thought your original requirement was to be able do this in batch without having to code a program. No?
Back to top
View user's profile Send private message
NAGARJUN CARALAPATI

New User


Joined: 09 Oct 2007
Posts: 22
Location: chennai.India

PostPosted: Tue Oct 16, 2007 6:53 pm    Post subject:
Reply with quote

But before using this 3.3 option i created an empty flat file and then gave for 3.3 option to copy.

If we didnt define before 3.3, then it is trying to create a new PDS and copy all the content to those PDS members to new PDS members.
Back to top
View user's profile Send private message
NAGARJUN CARALAPATI

New User


Joined: 09 Oct 2007
Posts: 22
Location: chennai.India

PostPosted: Tue Oct 16, 2007 6:54 pm    Post subject:
Reply with quote

Yes,
our original requirement was to be able do this in batch without having to code a program.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Tue Oct 16, 2007 7:00 pm    Post subject: Reply to: HOW TO COPY THE CONTENTS OF PDS MEMBERS TO A FLAT
Reply with quote

Quote:
If we didnt define before 3.3, then it is trying to create a new PDS and copy all the content to those PDS members to new PDS members.


Maybe You were pounding too fast on Your keyboard,
or You were not looking at the panel' s text

When You specify a non existent dataset, ISPF will ask
how to allocate the target dataset,
a reply with "1" will allocate with the same caractheristics of the source,
a reply with "2" will ask for the allocation parameters
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Fri Oct 19, 2007 12:53 pm    Post subject: Reply to: HOW TO COPY THE CONTENTS OF PDS MEMBERS TO A FLAT
Reply with quote

If you have FILEAID here's an example that works

//UPD EXEC PGM=FILEAID
//SYSPRINT DD SYSOUT=*
//SYSTOTAL DD SYSOUT=*
//SYSLIST DD SYSOUT=*
//DD01 DD DSN=INPUT.PDS,
// DISP=SHR
//DD01O DD DSN=OUTPUT.DSN,
// DISP=(,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(TRK,(500,100),RLSE)
//SYSIN DD *
*
$$DD01 COPY MEMBERS=ALL,OUT=0
Back to top
View user's profile Send private message
Sagar_mainframe

New User


Joined: 07 Jun 2008
Posts: 34
Location: Harrisburg, Pennsylvania

PostPosted: Wed Jul 15, 2009 1:20 am    Post subject: exactly reverse
Reply with quote

Hi,

I want to do exactly reverse!!!

I want to copy the flat file to PDS member.

What is a procedure to do this?

Thanks,
Back to top
View user's profile Send private message
Douglas Wilder

Active User


Joined: 28 Nov 2006
Posts: 305
Location: Deerfield IL

PostPosted: Wed Jul 15, 2009 1:56 am    Post subject:
Reply with quote

Is there a reason you replied to an old message instead of creating a new one?

Do you want to copy the flat file to one PDS member. If so you may use 3.3, IEBGENER, ICEGENER, IDCAMS, or other programs.

If you want the flat file to be split into several PDS members, then we need to know how to detect when one member ends and the next starts. It could easily help to know how this file was created.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Wed Jul 15, 2009 1:43 pm    Post subject:
Reply with quote

It depends on how the flat file was created. Without knowing how it was created we can to tell you how to restore it
Back to top
View user's profile Send private message
rahulbank

New User


Joined: 25 Sep 2008
Posts: 66
Location: Bengaluruuuuuu

PostPosted: Wed Jul 15, 2009 8:10 pm    Post subject: Can use this I used it to move from PDS to PS
Reply with quote

One has other options such as choose the members to be copied the columns to be copied and many...


//IEBPTPCH EXEC PGM=IEBPTPCH
//SYSUT1 DD DSN=file.file1,DISP=SHR
//SYSUT2 DD DSN=file.file2,DISP=(OLD,CATLG,DELETE)
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
PRINT TYPORG=PO,MAXFLDS=1
RECORD FIELD=(80)
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7913
Location: Bellevue, IA

PostPosted: Wed Jul 15, 2009 8:17 pm    Post subject:
Reply with quote

rahulbank, the post was for going from a flat file to a PDS. Your JCL is going from a PDS to a flat file. Exactly how does this help, since you're doing completely the opposite of what was asked?

sagar, as was pointed out by earlier posts, there's a lot of possible ways to do what you're asking but the tool used depends partly upon the flat file's characteristics. Unless you provide us more, all we can do is say yes it can be done but the specific tool depends upon the file.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Goto page 1, 2  Next
Page 1 of 2

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts syncsort: copy lines after the keyword shreya19 SYNCSORT 7 Fri Dec 02, 2016 9:47 am
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
No new posts File Aid to File Manager conversion murali3955 IBM Tools 4 Thu Nov 24, 2016 3:41 pm
No new posts How to convert the VBM file to VB or... Sulabh Agrawal JCL & VSAM 4 Fri Nov 18, 2016 1:04 pm
No new posts CICS Roll back partially - Need to re... dwijadas CICS 4 Wed Nov 16, 2016 4:30 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us