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
 

 

IEBPTPCH utility to copy members from a PDS to PS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> All Other Mainframe Topics
View previous topic :: :: View next topic  
Author Message
khadar78
Warnings : 1

New User


Joined: 29 Apr 2008
Posts: 16
Location: Mysore

PostPosted: Wed Aug 05, 2009 2:10 pm    Post subject: IEBPTPCH utility to copy members from a PDS to PS
Reply with quote

hi all,

I have used IEBPTPCH utility to copy members from a PDS to PS.
Sucessfully copied.

This is the step used.

//STEP1 EXEC PGM=IEBPTPCH
//SYSUT1 DD DSN=abcd.pds,DISP=SHR
//SYSUT2 DD DSN=Abcd.ps,
disp=(,catlg,delete),
space=(130,(10,20),rlse),avgrec=k,
recfm=fb,lrecl=130

//SYSIN DD *
PUNCH TYPORG=PO
//

but the problem is the members in the PDS are of 150 bytes and when copied to PS, it copies records only till 130 bytes and jumps to next line to copy other fields..
i tried using higher record length.. say lrecl=200, but it abends saying invalid DCB parameter and problem with the SYSIN parameter.

CAN anyone help me with this?? explain me wat does PUNCH TYPORG=PO do?? anything i need to look on??
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 Aug 05, 2009 2:23 pm    Post subject:
Reply with quote

khadar78

IEBPTPCH is not a CA product.

At the top of each page there is a button marked "IBM Manuals". Please click on this button and take a look at the utilities manual to read all about the limitations of IEBPTPCH.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


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

PostPosted: Wed Aug 05, 2009 4:59 pm    Post subject:
Reply with quote

Please click on the manuals link at the top of the page, find the JCL Language Reference manual, and read in it until you understand completely what you are doing in this statement (specifically the SPACE and LRECL parameters):
Code:
//SYSUT2 DD DSN=Abcd.ps,
disp=(,catlg,delete),
space=(130,(10,20),rlse),avgrec=k,
recfm=fb,lrecl=130
since this JCL conflicts with your statement that
Quote:
the members in the PDS are of 150 bytes
IEBPTPCH is doing exactly and precisely what you asked it to do. Don't blame the tool if you don't know enough to ask it to do what you want.
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: Wed Aug 05, 2009 6:18 pm    Post subject: Reply to: IEBPTPCH utility to copy members from a PDS to PS
Reply with quote

Quote:

The SYSUT2 DD statement is required every time IEBPTPCH is used. The record format is always FBA or FBM. The LRECL parameter, or, if no logical record length is specified, the BLKSIZE parameter, specifies the number of characters to be written per printed line or per punched card (this count must include the control character). The number of characters specified must be in the range of 2 through 145. The default values for edited output lines are 121 characters per printed line and 81 characters per punched card.

The SYSUT2 data set can be blocked by specifying both the LRECL and the BLKSIZE parameters, in which case, block size must be a multiple of logical record length.

If the logical record length of the input records is such that the output would exceed the output record length, IEBPTPCH divides the record into multiple lines or cards in the case of standard printed output, standard punched output, or when the PREFORM parameter is specified. For nonstandard output, or if the PREFORM parameter is not specified, only part of the input record is printed or punched (maximums determined by the specific characteristics of your output device).
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 -> All Other Mainframe Topics All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts TSO or command line utility to genera... kishpra JCL & VSAM 3 Thu Mar 09, 2017 1:11 am
No new posts Copying Panvalet members to PDS LOGESHWARAN K CA Products 4 Mon Mar 06, 2017 10:45 am
No new posts SORTJOIN - Copy Matched and Unmatched... Steve Ironmonger DFSORT/ICETOOL 5 Tue Jan 17, 2017 4:26 pm
No new posts HALDB data refresh/copy from producti... vineetanand2007 IMS DB/DC 1 Mon Jan 02, 2017 11:16 am
No new posts Copy RECFM =VB TO FB file with RECL =... sahil41352 DFSORT/ICETOOL 3 Wed Dec 28, 2016 11:29 pm


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