× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Well, my feeling was right; here's one solution.

 if qt6desc > '';                                       //Search
argument from DSPF
   search =  '%' + %trimr(qt6desc) + '%';  //SEARCH is defined as VARYING  
     else;                                     
   search = '';                              
 endif;                                    

C+                      ct6desc like (case when :search  > '' then :search 
C+                           else ct6desc                                  
C+                           end)                                          

Thanks to all who contributed!

Regards,
Reeve


On Fri, 24 Dec 2004 04:39:56 -0800, Tony Carolla <carolla@xxxxxxxxx> wrote:
> Are you creating a DS with a percent sign, the string, then the
> percent sign?  One solution might be to code a %Trim operation with
> the token, and the percent signs together, ex.
> 
> LikePhrase = '%' + %Trim(SearchArg) & '%';
> 
> If you make LikePhrase a VARYING alpha variable, it should eliminate
> the spaces.  I am not familiar with the way RPG passes the var to SQL,
> but for anything else, this would work.
> 
> 
> On Fri, 24 Dec 2004 02:23:17 -0800, Reeve <rfritchman@xxxxxxxxx> wrote:
> > I'm using both CASE and LIKE on a regular basis but I can't figure out
> > how to use LIKE with a variable as part of a CASE expression in a
> > static SQL statement.
> >
> > If a user enters a keyword into the keyword field, I want to do a LIKE
> > against a description field, something along the lines of this:
> >
> > Case When keyword > ' '  Then description like '%:keyword%' else null
> >
> > One problem is trimming the search token so SQL gets '%WIDGET%' and
> > not '%WIDGET       %'.
> >
> > I can code around the situation but I have a feeling I'm missing
> > something...or am I?
> >
> > Thanks,
> > Reeve
> > --
> > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> >
> >
> 
> --
> "Enter any 11-digit prime number to continue..."
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
> 
>

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.