Re: /Free testing a numeric value and by mistake use a comma in thetest

["Paul Tuohy" <tuohyp@xxxxxxxxxxxxx>]

I think you will get the same result regardless of whether you use comma or
period and regardless of of the decinal format for the job (or for the value
specified for DECEDIT on the H Spec).

IIRC, comma and period are always considered as a decimal point when used in
a numeric constant.

HTH

Paul Tuohy

----- Original Message -----
From: "Richard ECUYER" <recuyer@xxxxxxx>
To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
Sent: Monday, January 24, 2005 5:17 PM
Subject: Re: /Free testing a numeric value and by mistake use a comma in
thetest


> i think because the , is the decimal separator.
> try it with 10.000
>
> ----- Original Message -----
> From: "Andy Hautamaki" <ahautamaki@xxxxxxxxxxxxxxx>
> To: "RPG400-L@xxxxxxxxxxxx" <RPG400-L@xxxxxxxxxxxx>
> Sent: Monday, January 24, 2005 5:47 PM
> Subject: /Free testing a numeric value and by mistake use a comma in the
> test
>
>
> > This was a bug in my program but I'm curious why I got the results I
did.
> >
> > Here is an example;
> >
> >
> >  D v_Number1       s              7  0
> >  D v_Err                 s              1
> >
> >  v_Number1 = 500;
> >
> > if v_Number1 >= 10,000;
> >   v_Err = 'Y';
> > else;
> >   v_Err = 'N';
> > endif;
> >
> > Why was v_Number1 treated as greater or equal to 10,000? I'm at V5R2.
> >
> > Thanks
> > Andy
> >
> > --
> > 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.
> >
> >
>
> --
> 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.
>
>