IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

IEBPTPCH PDS to PS.


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
rahulbank

New User


Joined: 25 Sep 2008
Posts: 66
Location: Bengaluruuuuuu

PostPosted: Thu Aug 13, 2009 10:16 pm
Reply with quote

Code:

//IEBPTPCH EXEC PGM=IEBPTPCH
//SYSUT1    DD DSN=SMGT.HEALTHCK.REPORT,DISP=SHR
//SYSUT2    DD DSN=SMGT.TRY,DISP=OLD
//SYSPRINT DD SYSOUT=*
//SYSIN      DD *
  PRINT TYPORG=PO,MAXNAME=4,MAXFLDS=1
  MEMBER NAME = GYGY
  MEMBAR NAME = HUHU
  RECORD FIELD=(80)
/*     

Using this job I'm able to transfer some members from PDS to PS...however the format of the first member gets dispersed/changed(is different from the original format) and only the last member is in a proper format...can someone please suggest how to print the members to the PS just the way it is....
Back to top
View user's profile Send private message
superk

Global Moderator


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

PostPosted: Thu Aug 13, 2009 10:59 pm
Reply with quote

Did you already try the TSO PRINTDS command?
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8700
Location: Dubuque, Iowa, USA

PostPosted: Thu Aug 13, 2009 11:08 pm
Reply with quote

1. You've got a typo -- MEMBAR NAME = is not going to work.
2. MEMBER NAME = will not work since there can be no spaces around the equal sign. This is one reason we encourage posting exact JCL and not your interpretation of the JCL -- and use BBcode to make spacing obvious.
3. Did you add the carriage control character to the SMGT.TRY file LRECL (so it is one more than the LRECL of SMGT.HEALTHCK.REPORT)?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8796
Location: Welsh Wales

PostPosted: Fri Aug 14, 2009 11:29 am
Reply with quote

For 80 byte records, I always find that the PUNCH option works OK.
In fact I even tested it before posting.
Back to top
View user's profile Send private message
rahulbank

New User


Joined: 25 Sep 2008
Posts: 66
Location: Bengaluruuuuuu

PostPosted: Mon Aug 17, 2009 5:43 pm
Reply with quote

My i/p dsn is

Record length . . . : 121
Block size . . . . : 27951

and o/p dsn is

Record length . . . : 122
Block size . . . . : 28182

This is my JCL:

//IEBPTPCH EXEC PGM=IEBPTPCH
//SYSUT1 DD DSN=SMGT.HEALTHCK.REPORT,DISP=SHR
//SYSUT2 DD DSN=SMGT.TRY1,DISP=(OLD,CATLG,DELETE)
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
PRINT TYPORG=PO,MAXNAME=4,MAXFLDS=1
MEMBER NAME=HC1A01
MEMBER NAME=HC1B01
MEMBER NAME=HC1C01
MEMBER NAME=HC1D01
RECORD FIELD=(80)

STill the o/p even though the 1 character is there in LRECL of the o/p dsn more it does not work....the punch option works fine but still it is not as good as when printing all the members at the same time using print...

I am facing this problem only when I try to print or punch selective members if I want to print all o/p is good (without member name coded)....
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts IEBPTPCH for many PS JCL & VSAM 7
No new posts IEBPTPCH limitations JCL & VSAM 8
No new posts IEBPTPCH utility to copy members from... All Other Mainframe Topics 3
No new posts Run IEBPTPCH with several PDS in SYSUT1 JCL & VSAM 13
No new posts sample JCL for IEBPTPCH Utility JCL & VSAM 1
Search our Forums:

Back to Top