i have the following Situation and need some help please.
Input File RECL 62.
>------TEXT-FIELD--------------<
0001000101BEUSERID000000EF1DTEXT10000000000000000000000000EFDE
0001000101BEUSERID000000EF1DSOMETEXT1000000000000000000000EFDE
Pos 1-28 Some Binary Decimal and Chars
Pos 29-59 TEXTFIELD CHAR 30 Bytes filled with HEX'00'
Pos 60-61 Binary Decimal
Now, i have a DFSORT that will make a Overlay on the Char Field at Position 29. So far, so good.
....
OVERLAY=(29:C'. TEST OK')
...
OVERLAY=(29:C'. TEST OK')
...
That will Result in
>------TEXT-FIELD--------------<
0001000101BEUSERID000000EF1DTEST OK00000000000000000000000EFDE
0001000101BEUSERID000000EF1DTEST OKT1000000000000000000000EFDE
To remove the Overlayed Text TEST OKT1 i am able to Change the Overlay to:
....
OVERLAY=(29:C'. TEST OK',X23'00')
...
OVERLAY=(29:C'. TEST OK',X23'00')
...
With the Result
>------TEXT-FIELD--------------<
0001000101BEUSERID000000EF1DTEST OK00000000000000000000000EFDE
0001000101BEUSERID000000EF1DTEST OK00000000000000000000000EFDE
But what i need is to append my Text at the First Position of a Hex '00' in the Textfield between Position 29-59 so the Result should be:
>------TEXT-FIELD--------------<
0001000101BEUSERID000000EF1DTEXT1TEST OK000000000000000000EFDE
0001000101BEUSERID000000EF1DSOMETEXT1TEST OK00000000000000EFDE
How am i able to give the Overlay the instructions to append a Text on the Fist Position of a Hex'00' in a Textfield?
Best Regards Thomas