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
 

 

Handle less than or equal to condition in search all

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
Anand78

New User


Joined: 06 Mar 2006
Posts: 50
Location: PUNE

PostPosted: Wed May 07, 2008 9:56 am    Post subject: Handle less than or equal to condition in search all
Reply with quote

Hi All,

Please help me how to handle less than or equal to condition in search all.

SEARCH ALL GROSS-DISC-TBLE
AT END
MOVE 'N' TO GROSS-DISC-ENTRY
WHEN FFH-SEQUENCE-NUMBER = GRS-FEE-SEQ (GRS-IDX)
AND FFH-TABLE-RECID = GRS-FEE-RECID (GRS-IDX)
AND GRS-FEE-PROD (GRS-IDX) >= 75
MOVE 'Y' TO GROSS-DISC-ENTRY
END-SEARCH.
Back to top
View user's profile Send private message

nabarundas

New User


Joined: 21 Jun 2007
Posts: 28
Location: pune

PostPosted: Wed May 07, 2008 10:47 am    Post subject: Hi..
Reply with quote

Hi Anand78,

Quote:
AND GRS-FEE-PROD (GRS-IDX) >= 75


We can't use '>=' in SEARCH ALL only we can use '=' . If your requirement is to use '>=' then go for SEARCH not SEARCH ALL.

Regards
Back to top
View user's profile Send private message
sri_mf

Active User


Joined: 31 Aug 2006
Posts: 216
Location: India

PostPosted: Wed May 07, 2008 12:15 pm    Post subject: Re: Handle less than or equal to condition in search all
Reply with quote

Anand78 wrote:
Hi All,

Please help me how to handle less than or equal to condition in search all.

SEARCH ALL GROSS-DISC-TBLE
AT END
MOVE 'N' TO GROSS-DISC-ENTRY
WHEN FFH-SEQUENCE-NUMBER = GRS-FEE-SEQ (GRS-IDX)
AND FFH-TABLE-RECID = GRS-FEE-RECID (GRS-IDX)
AND GRS-FEE-PROD (GRS-IDX) >= 75
MOVE 'Y' TO GROSS-DISC-ENTRY
END-SEARCH.


Anand pls refer this http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/handheld/Connected/BOOKS/IGYL1101/3.30?DT=19930312093006
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. How to pass the previous month date i... Suganya87 DFSORT/ICETOOL 5 Mon Oct 31, 2016 4:13 pm
No new posts hot to get details when "EXEC CI... Andi1982 CICS 11 Tue Sep 20, 2016 5:01 pm
No new posts LIKE vs EQUAL Nileshkul DB2 7 Sat Jul 16, 2016 7:50 am
No new posts INCLUDE condition questions van bui DFSORT/ICETOOL 1 Thu Jun 30, 2016 9:52 am
No new posts Search a Load Module sreekanth1984 TSO/ISPF 8 Tue Jun 07, 2016 8:45 pm


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