|
View previous topic :: View next topic
|
| Author |
Message |
loverj24
New User
Joined: 05 Jul 2007
Posts: 16
Location: bangalore
|
|
|
|
Hi, I have the following file
| Code: |
|UHC|MHS
|UHC|MHS
|UHC|MHS
|UHC|MHS
|UHC|MHS
|UHC|SA
|UHC|SA |
I need to replace all UHC with TNT. The total length of the file is 93.
The Data that needs to be replaced starts at 86th postion and is of 3 bytes.
I need to use sort to acheive this.
Please help |
|
| Back to top |
|
 |
mainframeracf
New User
Joined: 27 Nov 2008
Posts: 5
Location: bangalore
|
|
|
|
| do u need the code using sort or any other coding is ok for u. |
|
| Back to top |
|
|
loverj24
New User
Joined: 05 Jul 2007
Posts: 16
Location: bangalore
|
|
|
|
| Need the code using sort as i will be using that code in a Jclparm inside a Proc. |
|
| Back to top |
|
|
Arun Raj
Moderator
Joined: 17 Oct 2006
Posts: 2481
Location: @my desk
|
|
|
|
loverj24,
The below sort might help.
| Code: |
//SYSIN DD *
OPTION COPY
INREC IFTHEN=(WHEN=(86,3,CH,EQ,C'UHC'),OVERLAY=(86:C'TNT'))
/* |
|
|
| Back to top |
|
|
loverj24
New User
Joined: 05 Jul 2007
Posts: 16
Location: bangalore
|
|
|
|
Thanks a Lot Arun. It worked  |
|
| Back to top |
|
|
|
|
