AW: Technique (BIF) to perform a %LIKE% in RPG?

Hi,

just use embedded SQL!

D MyText S 50A Varying inz('Search XYabZXYxxZ XYZ
within a String')
D MySearch S 10A Varying inz('%XY__Z%')

D isFound S N
/Free
Exec SQL Set :isFound = Case When :MyText like :MySearch Then '1'
Else '0' End;
If IsFound;
//String is Found
EndIf;


Mit freundlichen Grüßen / Best regards

Birgitta Hauser

"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"

-----Ursprüngliche Nachricht-----
Von: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] Im Auftrag von Robert Nesiba
Gesendet: Tuesday, 02. February 2010 21:44
An: Midrange Systems Technical Discussion
Betreff: Technique (BIF) to perform a %LIKE% in RPG?

I don't see a BIF to perform a "fuzzy match" like the "LIKE" construct
in SQL.
Do you have a technique for me? Thanks! (or a URL example?)

Thanks!