Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist 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: 8152
Location: East Dubuque, Illinois, USA

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: 4650
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 XMITIP sends it out. Can it copy on l... Rommel Dayon Rustia IBM Tools 0 Tue Sep 05, 2017 10:16 am
No new posts Historical/statistical details for me... elixir1986 TSO/ISPF 13 Wed Aug 30, 2017 9:02 pm
No new posts Unable to copy data from spool in a d... srikant314 JCL & VSAM 8 Fri Jul 28, 2017 9:10 pm
No new posts How to Use DebugTool CodeCoverage Uti... neo4u IBM Tools 0 Thu Jun 22, 2017 6:38 pm
No new posts Search utility(3.14) using JCl and Cobol RKS3 COBOL Programming 12 Sat Jun 10, 2017 10:24 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us