IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Replacing Negative Values with Zeroes


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
sambasivarao

New User


Joined: 10 Jul 2006
Posts: 47
Location: Bangalore

PostPosted: Tue May 20, 2008 2:32 pm
Reply with quote

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.
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Tue May 20, 2008 9:17 pm
Reply with quote

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)) 
/*
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts Replacing 'YYMMDD' with date, varying... SYNCSORT 3
No new posts INCLUDE OMIT COND for Multiple values... DFSORT/ICETOOL 5
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
No new posts Remove leading zeroes SYNCSORT 4
No new posts Null values are considered in Total c... DFSORT/ICETOOL 6
Search our Forums:

Back to Top