Re: Nested IF, OR and AND in /free

["Raul A. Jager W." <raul@xxxxxxxxxx>]

Sory, chk1 in ('7', '8', '9') will work in SQL, but in RPG free you will 
have to compare eache value

if chk1 = '7' or chk1 = '8' or ...

Nick_Radich@xxxxxxxxxxxxxx wrote:

> Hello everyone,
>
> We are at V5R4.
>
> I am trying to get more into using /free, after 30 years of programming.
>
> I have included the following snippet of code that will not compile.  I 
> get error RNF7421 on the compile listing.
>
> I have also tried entering this using WDSC.
>
> Can I do this code at V5R4?
>
> /free
>        if chk1 = ('7' or '8' or '9')
>        or chk1 = '1'
>        and chk6 <> '  ';
> /end-free
>
>
> Any help or pointers will be greatly appreciated.
>
>
>
> Thanx,
>
> Nick
>
>
>
> Nick Radich
> Sr. Programmer/Analyst
> EPC Molding, Inc.
> Direct  (320) 679-6683
> Toll free  (800) 388-2155  ext. 6683
> Fax  (320) 679-4516
> nick_radich@xxxxxxxxxxxxxx
>