View previous topic :: View next topic
|
Author |
Message |
Gousiya Mulla
New User
Joined: 02 Jun 2008 Posts: 87 Location: Bangalore
|
|
|
|
Hi,
I have a file with FB, reclen=80.
My requirement if the input is 3 char len , then a zero should be inserted at the beginning.
Ex:
IP : 789
OP: 0789
Any pointers please .... |
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
It would have helped if you'd explained what you want in more detail with more examples. See if a DFSORT job like the following does what you want:
Code: |
//S1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
789
0001
333
0234
1234
//SORTOUT DD SYSOUT=*
//SYSIN DD *
OPTION COPY
INREC OVERLAY=(1,4,UFF,EDIT=(TTTT))
/*
|
SORTOUT would have:
Code: |
0789
0001
0333
0234
1234
|
If that's not what you want, then do a better job of explaining what you do want with a better example of input and expected output. |
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
Removed many posts resulting from a misguided and pointless attempt to "help". |
|
Back to top |
|
|
Gousiya Mulla
New User
Joined: 02 Jun 2008 Posts: 87 Location: Bangalore
|
|
|
|
Thanks Frank .... its really helpful !! |
|
Back to top |
|
|
abraralum
New User
Joined: 19 Dec 2010 Posts: 42 Location: Bangalore
|
|
|
|
Hi,
I wanted additional information about the edit masks passed in the above sort card like UFF,EDIT=(TTTT).
It would be nice if you can point me to some meterial.
I tried googling in few but could not get exact info.
Please provide me info if possible . |
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
UFF is a format. EDIT=(TTTT) is a user-defined edit mask.
If you're not familiar with DFSORT and DFSORT's ICETOOL, I'd suggest reading through "z/OS DFSORT: Getting Started". It's an excellent tutorial, with lots of examples, that will show you how to use DFSORT, DFSORT's ICETOOL and DFSORT Symbols. You can access it online, along with all of the other DFSORT books, from:
www.ibm.com/support/docview.wss?rs=114&uid=isg3T7000080 |
|
Back to top |
|
|
|