Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Need help to search the amount field in character format

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
Revathi Baala

New User


Joined: 27 Feb 2008
Posts: 7
Location: India

PostPosted: Wed Dec 17, 2008 5:12 pm    Post subject: Need help to search the amount field in character format
Reply with quote

Hi,

I have a amount field in character format. Need to retrieve all the rows if the amount is greater than 5000.

FB- >80
eg. +121584.32 -> amount field.

Need to write a sort card to retrieve the amount greater than 5000.

Can you please help me.

Thanks.
Back to top
View user's profile Send private message

nelson.pandian

Active User


Joined: 09 Apr 2008
Posts: 133
Location: Phoenix, AZ

PostPosted: Wed Dec 17, 2008 5:58 pm    Post subject:
Reply with quote

Hi Revathi,

Welcome to the forum.

Please provide us some sample input and expected output data. The starting position and the character length of the amount field.
Back to top
View user's profile Send private message
Skolusu

Senior Member


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

PostPosted: Wed Dec 17, 2008 10:02 pm    Post subject:
Reply with quote

Revathi Baala,

You can use the SFF format on INCLUDE COND to get the desired results.

Code:

//STEP0100 EXEC PGM=ICEMAN             
//SYSOUT   DD SYSOUT=*                 
//SORTIN   DD *                       
+121584.32  - YES                     
    +23.11  - NO                       
  -5000.22  - NO                       
    +50.33  - NO                       
  +5000.44  - YES                     
  +4999.99  - NO                       
 +15000.99  - YES                     
//SORTOUT  DD SYSOUT=*                 
//SYSIN    DD *                       
  SORT FIELDS=COPY                     
  INCLUDE COND=(1,10,SFF,GT,500000)   
/*
Back to top
View user's profile Send private message
Revathi Baala

New User


Joined: 27 Feb 2008
Posts: 7
Location: India

PostPosted: Thu Dec 18, 2008 11:35 am    Post subject:
Reply with quote

Thanks Kolusu.

I tried with you example. It worked.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Extra character appears in file when ... Balu5491 All Other Mainframe Topics 1 Wed Jul 26, 2017 2:39 pm
No new posts Search utility(3.14) using JCl and Cobol RKS3 COBOL Programming 12 Sat Jun 10, 2017 10:24 pm
No new posts Need to write record of PS File in ex... Chandan1993 JCL & VSAM 1 Wed Jun 07, 2017 1:35 am
No new posts READ A PACKED "NEGATIVE" FI... jdesouza CA Products 3 Tue May 02, 2017 11:43 pm
No new posts Alter &DATENS field in HEADER1 Angad DFSORT/ICETOOL 4 Mon Apr 24, 2017 11:49 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us