RE: Is there a Shortcut here?

[Jerry Adams <Jerry@xxxxxxxxxxxxxxx>]

I, too, use XTools; pretty good stuff.  The inList function, though, is one that would be pretty easy to write, put into a service program, and go.

Jerry C. Adams
IBM System i Programmer/Analyst
--
B&W Wholesale
office: 615-995-7024
email:  jerry@xxxxxxxxxxxxxxx

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Roger Harman
Sent: Thursday, April 02, 2009 5:58 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Is there a Shortcut here?

Should be easy enough to write.  A loop with %scan(), perhaps?  Or, just
encapsulate the nasty if's in a procedure and reuse as needed.

I know Bob Cozzi has an Inlist() that does this in his Xtools.


> > > koldark@xxxxxxxxx 04/02/2009 1:18:47 PM >>>
I am getting ready to write a nasty if statement and had a thought.
"Is
there a shortcut for this?"

Is there something similar to the IN statement in SQL but for an RPG
IF
statement? In SQL I could say WHERE STATUS IN (1, 3, 5, 7, 9). Is
there
something similar for an RPG IF?