Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist 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: 215
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
No new posts HEX value search in a DB2 query maxsubrat DB2 2 Wed Oct 04, 2017 3:04 pm
No new posts BUILD OUTFIL based on condition other... balaji81_k DFSORT/ICETOOL 13 Fri Sep 08, 2017 11:06 pm
No new posts Search for a string in many PDS KARTHIGADEVI CLIST & REXX 5 Fri Sep 08, 2017 2:32 pm
No new posts Search utility(3.14) using JCl and Cobol RKS3 COBOL Programming 12 Sat Jun 10, 2017 10:24 pm
This topic is locked: you cannot edit posts or make replies. Need help on If condition continuatio... ashok_uddaraju CLIST & REXX 4 Fri May 19, 2017 8:55 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us