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

IEBPTPCH utility to copy members from a PDS to PS


IBM Mainframe Forums -> All Other Mainframe Topics
Post new topic   Reply to topic
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
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: 8796
Location: Welsh Wales

PostPosted: Wed Aug 05, 2009 2:23 pm
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: 8700
Location: Dubuque, Iowa, USA

PostPosted: Wed Aug 05, 2009 4:59 pm
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

Global Moderator


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

PostPosted: Wed Aug 05, 2009 6:18 pm
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> All Other Mainframe Topics

 


Similar Topics
Topic Forum Replies
No new posts IEBPTPCH for many PS JCL & VSAM 7
No new posts Copy only TEXT or String from a record SYNCSORT 4
No new posts Use Copy Utility DB2 7
No new posts VB to VB copy - Full length reached SYNCSORT 8
No new posts REASON 00D70014 in load utility DB2 6
Search our Forums:

Back to Top