| View previous topic :: View next topic |
| Author |
Message |
maxisnowhere
Beginner
Joined: 25 May 2005
Posts: 59
Topics: 20
|
 Posted: Wed Jan 11, 2006 10:33 am Post subject: How to put Member name on each record beginning |
 |
|
Hello!
I want to copy all the memner of a library in a sequential file, putting at the beginning of each record, the name of the member where it is.
With IEBPTPCH i got all the member, but i really don't know how to put the member name on the top.
Thx for all help !!
Max
_________________
Maxisnowhere |
|
| Back to top |
|
 |
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
|
| Posted: Wed Jan 11, 2006 10:40 am Post subject: |
|
|
| Quote: |
With IEBPTPCH i got all the member, but i really don't know how to put the member name on the top.
|
maxisnowhere,
You can use PUNCH operator of IEBPTPCH which will put the member at the top.
try this
| Code: |
//STEP0100 EXEC PGM=IEBPTPCH
//SYSUT1 DD DSN=YOUR PDS,
// DISP=SHR
//SYSUT2 DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
PUNCH TYPORG=PO
/*
|
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
maxisnowhere
Beginner
Joined: 25 May 2005
Posts: 59
Topics: 20
|
| Posted: Thu Jan 12, 2006 2:39 am Post subject: |
|
|
Ok this will put the member name on the top of the member. Thank you.
I would libe to have the name of the member at the beginning of each record.
For examle I have the mambere MEMBERONE with rows:
AAAAAA
BBBBBB
CCCCC
I would like to obtain:
MEMBERONEAAAAAA
MEMBERONEBBBBBB
MEMBERONECCCCC
Thx4all
max
_________________
Maxisnowhere |
|
| Back to top |
|
|
haatvedt
Beginner
Joined: 14 Nov 2003
Posts: 66
Topics: 0
Location: St Cloud, Minnesota USA
|
| Posted: Sun Jan 15, 2006 3:30 am Post subject: |
|
|
I use a File-Aid step after the IEBPTPCH step to accomplish this. You could certainly use other programming languages to accomplish this. If you have File-Aid and want an example of this, send me an email.
Chuck H.
_________________
Chuck Haatvedt
email --> clastnameatcharterdotnet
(replace lastname, at, dot with appropriate
characters) |
|
| Back to top |
|
|
MikeBaker
Beginner
Joined: 04 May 2004
Posts: 96
Topics: 9
|
| Posted: Sun Jan 15, 2006 5:15 pm Post subject: |
|
|
File-Aid can provide quick and simple solutions to things like this, however I prefer to steer clear of 3rd-Party products like File-Aid for things like this. DFSORT would be a better choice, simply because you are likely to find DFSORT whereever you go, and it is highly unlikely that the product will ever be removed from your shop.
Why? For example (in our shop), over the years programmers coded all sorts of things using File-Aid. Now however... our shop has done a deal with IBM and File-Aid is (in the process of) being replaced by File-Manager (IBMs answer to File-Aid). And so the File-Aid stuff now needs to be urgently replaced. A right royal pain. And do you think that I'm gonna write File-Manager equivalents for the File-Aid stuff. No way Jose! And risk having to re-write the stuff yet again in x number of years? Nope. Just stick to using the standard IBM utilities, and you won't need to worry about rewriting the stuff ever again. |
|
| Back to top |
|
|
maxisnowhere
Beginner
Joined: 25 May 2005
Posts: 59
Topics: 20
|
| Posted: Mon Jan 16, 2006 4:16 am Post subject: |
|
|
We don't have File-Aid on our system, so I will use the DFSORT, can you show me how?
thx
_________________
Maxisnowhere |
|
| Back to top |
|
|
MikeBaker
Beginner
Joined: 04 May 2004
Posts: 96
Topics: 9
|
| Posted: Mon Jan 16, 2006 4:52 am Post subject: |
|
|
| Have a look at all the examples on ICETOOL (part of DFSORT) given by Frank Yaeger. Then you will get some idea of how to proceed. |
|
| Back to top |
|
|
|
|
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
