Re: What is the key to the magic number 236,551.69 ??

[Jim Langston <jimlangston@xxxxxxxxxxxxxxxx>]

That appears to be basically what happened.  Duel format logical, and
the selection criteria wasn't getting rid of the wrong format, so was
mapping some other data to a number.  I added 3 lines to the program to
mask out the inappropriate data and all seems fine now, running a test.

The only thing that seems confusing, is that they have been using this
program for years, and from what I see it should have never given correct
results.

Strange.

Regards,

Jim Langston

Scott Mildenberger wrote:
> 
> Some text may have been put into those fields and it ends up being that
> value when converted to numeric.
> 
> Scott Mildenberger
> 
> > -----Original Message-----
> > From: Jim Langston [mailto:jimlangston@conexfreight.com]
> > Sent: Tuesday, February 27, 2001 12:40 PM
> > To: RPG400-L@midrange.com
> > Subject: What is the key to the magic number 236,551.69 ??
> >
> >
> > I have an old system 36 RPG program that has broken unexpectedly.
> > It is supposed to be adding up the receivables for a month.  The
> > figures it comes up with are way too high (25 million instead of
> > 36 thousand) and I have written some code to dump certain fields.
> >
> > I see that for a number of records that it shouldn't even been
> > including it has the invoice amount as 236,551.69.
> >
> > This variable is being declared as 122 1292 so is zoned with 2
> > decimal places.
> >
> > I hate debugging S36 programs.
> >
> > Regards,
> >
> > Jim Langston
> > +---
> > | This is the RPG/400 Mailing List!
> > | To submit a new message, send your mail to RPG400-L@midrange.com.
> > | To subscribe to this list send email to RPG400-L-SUB@midrange.com.
> > | To unsubscribe from this list send email to
> > RPG400-L-UNSUB@midrange.com.
> > | Questions should be directed to the list owner/operator:
> > david@midrange.com
> > +---
> >
> +---
> | This is the RPG/400 Mailing List!
> | To submit a new message, send your mail to RPG400-L@midrange.com.
> | To subscribe to this list send email to RPG400-L-SUB@midrange.com.
> | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: david@midrange.com
> +---
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---