|
View previous topic :: View next topic
|
| Author |
Message |
mukunthg
New User
Joined: 27 Mar 2007
Posts: 10
Location: India
|
|
|
|
Hi,
How to move Spaces to fields that have some values in them?
For Eg:
I have a FB file with LRECL = 2000.
The fields from column 1125-1130 have some values like "YNN Y ". I want spaces to be moved to those fields (1125-1130). How to achieve that?
Thanks,
Mukunth |
|
| Back to top |
|
 |
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
|
|
|
|
Mukunth,
Here's a DFSORT job that will do what you asked for.
| Code: |
//S1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=... input file
//SORTOUT DD DSN=... output file
//SYSIN DD *
OPTION COPY
INREC IFTHEN=(WHEN=(1125,6,CH,EQ,C'YNN Y '),
OVERLAY=(1125:6X))
/*
|
|
|
| Back to top |
|
|
mukunthg
New User
Joined: 27 Mar 2007
Posts: 10
Location: India
|
|
|
|
| Thanks Frank. |
|
| Back to top |
|
|
|
|
