RE: Dumb programming question..

Nope, still the same.

You get a divide by zero error no mater what.

Manipulating an expression algebraically produces no changes or exceptions to 
the original results unless you've done something wrong.


HTH,

Charles Wilt
--
iSeries Systems Administrator / Developer
Mitsubishi Electric Automotive America
ph: 513-573-4343
fax: 513-398-1121
 

> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of KBarry
> Sent: Wednesday, August 31, 2005 1:47 PM
> To: RPG programming on the AS400 / iSeries
> Subject: Re: Dumb programming question..
> 
> 
> Except, I think, when FieldA = *zero
> 
> Kevin Barry
> Tell Systems
> 
> ----- Original Message ----- 
> From: <RPower@xxxxxxxxxx>
> To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
> Sent: Wednesday, August 31, 2005 12:22 PM
> Subject: Re: Dumb programming question..
> 
> 
> > Well I'll be damned.  That actually works.  Someone is 
> either an algebra 
> > genius or has a lot of time on their hands :P
> > lol, nice work there tho.  That really simplies the equation.
> > 
> > Ron Power
> > Programmer
> > Information Services
> > City Of St. John's, NL
> > P.O. Box 908
> > St. John's, NL
> > A1C 5M2
> > 709-576-8132
> > rpower@xxxxxxxxxx
> > http://www.stjohns.ca/
> > 
> > "Paul Morgan" <pmorgan@xxxxxxxxxxxxxx> 
> > Sent by: rpg400-l-bounces@xxxxxxxxxxxx
> > 2005/08/31 01:30 PM
> > Please respond to
> > RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> > 
> > To
> > rpg400-l@xxxxxxxxxxxx
> > cc
> > 
> > Subject
> > Re: Dumb programming question..
> > 
> > Chuck,
> > 
> > Starting out with :
> > 
> > ( ( FieldA - 1 ) / FieldA ) * 100
> > 
> > Then a little algebra:
> > 
> > ( ( FieldA / FieldA ) - ( 1 / FieldA ) ) * 100
> > ( 1 - ( 1 / FieldA ) ) * 100
> > 
> > to end up with:
> > 
> > 100 - ( 100 / FieldA)
> > 
> > Paul
> > 
> > -- 
> > Paul Morgan
> > Senior Programmer Analyst - Retail
> > J. Jill Group
> > 100 Birch Pond Drive, PO Box 2009
> > Tilton, NH 03276-2009
> > Phone: (603) 266-2117
> > Fax:   (603) 266-2333
> > 
> > Chuck wrote
> > 
> >> Subtract 1 from FieldA
> >> Divide that result by FieldA
> >> Multiply that result by 100
> 
> -- 
> 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.
> 
>