ganeshptrk
New User
Joined: 04 Apr 2007 Posts: 17 Location: Chennai
|
|
|
|
Hi All,
I saw some posts in this forum explaning how to find a particular occurance of a character and changing it's value to some other. But these examples are talking about chaganing character values. I have Hexadecimal data to change. These examples are not working for hexadecmial data. Can someone please give me the jcl for this.
My requirement is
I have a VB file. If the value at 4th byte is X'2303102122', and the value at 75th byte is X'04', change 75th byte to X'06'
Please hlep
thanks |
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
ganeshptrk,
It works fine if you use the correct control statements. I'd take an educated guess that you didn't account for the RDW in the first 4 bytes of the VB records, so you got the starting positions wrong. The "4th byte" would actually be position 8 (4+4) and the "75th byte" would actually be position 79 (75+4). These DFSORT control statements do what you asked for:
Code: |
OPTION COPY
INREC IFTHEN=(WHEN=(8,5,BI,EQ,X'2303102122',
AND,79,1,BI,EQ,X'04'),OVERLAY=(79:X'06'))
|
|
|