|
View previous topic :: View next topic
|
| Author |
Message |
kart__0987
New User
Joined: 18 Jul 2006
Posts: 5
|
|
|
|
Hi,
I need to replace all Zeroes with Blanks in a file . The Problem is that the field is 14 bytes long and may contain Zeroes in any of the 14 positions and i need to leave the Non Zero positions intact . I know that i can do using the Inspect Verb in a Cobol program but wanted to know if this was possible using Syncsort
Thanks |
|
| Back to top |
|
 |
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix
|
|
|
|
Hello,
Yes, you should be able to do what you want using ALTSEQ. |
|
| Back to top |
|
|
Alissa Margulies
SYNCSORT Support
Joined: 25 Jul 2007
Posts: 496
Location: USA
|
|
|
|
As Dick suggested, here is sample code that will change ALL binary zeros to spaces:
| Code: |
//SYSIN DD *
SORT FIELDS=COPY
ALTSEQ CODE=(0040)
OUTREC FIELDS=(1,80,TRAN=ALTSEQ)
/* |
|
|
| Back to top |
|
|
|
|
