Re: Test a field for specific values only

[Charles Wilt <charles.wilt@xxxxxxxxx>]

You know..my first thought was %check...but thought maybe I was
misremembering how it worked...otherwise Jeff would have just used it.
 Or perhaps it loops behind the scenes and thus was disqualified...

So I came up with my bit twiddling answer. :)

Charles


On Tue, Nov 8, 2011 at 5:29 PM, John Yeung <gallium.arsenide@xxxxxxxxx> wrote:
> Jeff, did you try it?  Your situation is the *exact* reason for the
> existence of the %check function.
>
> John
>
> On Tue, Nov 8, 2011 at 4:59 PM, Jeff Young <jyoung0950@xxxxxxxxx> wrote:
> > That does not work if the field is AA or NN.
> > Each position of the field can only be A or N.
> >
> > On Tue, Nov 8, 2011 at 4:09 PM, Khalid Hachi <khachi@xxxxxxxxxxxxxx> wrote:
> >
> > > Hi Jeff,
> > >
> > > D C_AN          C                   'AN'
> > >
> > > Pos = %CHECK(C_AN :YourField);
> > > If Pos <> 0;
> > >   //Error
> > > Endif;
> --
> This is the RPG programming on the IBM i / System i (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.