Re: Dumb programming question..

Yeah, at 4 AM in the morning after coming home at 3 AM on the booze lol.

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/
___________________________________________________________________________
Success is going from failure to failure without a loss of enthusiasm. - 
Sir Winston Churchill




"Booth Martin" <booth@xxxxxxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
2005/08/31 04:08 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
cc

Subject
Re: Dumb programming question..






*ppsssttttttt* 



*shhhhhhh!!!!*  don't tell him.  Let him learn it the hard way.   Like we
all did.  hee hee 

 

---------------------------------

Booth Martin

http://www.martinvt.com

---------------------------------

-------Original Message-------

 

From: RPG programming on the AS400 / iSeries

Date: 08/31/05 13:14:43

To: RPG programming on the AS400 / iSeries

Subject: Re: Dumb programming question..

 

True, division by zero.

 

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/

___________________________________________________________________________

Success is going from failure to failure without a loss of enthusiasm. -

Sir Winston Churchill

 

 

 

 

"KBarry" <kbarry@xxxxxxxxxxxxxxx>

Sent by: rpg400-l-bounces@xxxxxxxxxxxx

2005/08/31 03:16 PM

Please respond to

RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>

 

 

To

"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>

cc

 

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.

 

 

--

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.

 

.