sambasivarao
New User
Joined: 10 Jul 2006 Posts: 47 Location: Bangalore
|
|
|
|
I'm getting the Input file from other system. In that system, I'm getting the Negative values, As I need to replace these Negative Values with Zeroes and process the Input file to other system.
Could you please suggest me how can I do this for replacing Negative values with Zeroes?
Cheers,
Sambasiva Rao. |
|
Skolusu
Senior Member
Joined: 07 Dec 2007 Posts: 2205 Location: San Jose
|
|
|
|
Use the following DFSORT control cards
Code: |
//SYSIN DD *
SORT FIELDS=COPY
OUTREC IFTHEN=(WHEN=(6,2,PD,LT,0),
OVERLAY=(6:+0,TO=PD,LENGTH=2))
/* |
|
|