RE: Calculation Truncation Problem

Yes, I missed a zero when I typed.


Rick Weber | TЯU International 

-----Original Message-----
From: Booth Martin [mailto:booth@xxxxxxxxxxxx] 
Sent: Wednesday, September 14, 2005 1:36 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: Calculation Truncation Problem

should the answer be .00005  or .000005 (two more zeros, not one more)?



Of course, it still should have worked if SUMOPROJD is 7 decimal places?  



hmmmmm.....



 

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

Booth Martin

http://www.martinvt.com

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

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

 

From: RPG programming on the AS400 / iSeries

Date: 09/14/05 12:22:23

To: 'rpg400-l@xxxxxxxxxxxx'

Subject: Calculation Truncation Problem

 

I'm having trouble with the following line of code:

 

Sum_x_PJS = SumOProjD * P1_PjSlsDol;

 

Where the input variables are:

 

P1_PJSLSDOL = 0000000000000.01

SUMOPROJD = 0000000000000.0005

 

When step through the program the result of this is SUM_X_PJS =

0000000000000.0000000.   Of course the result should be .00005.  So, what's

going on?  I have the receiving variable SUMOPROJD small enough to hold the

result, 7 below the decimal.  What am I missing?

 

 

Richard L. Weber  |  Senior Systems Analyst, TOYS 'ñ' US International  |

973.617.3497  |  weberr@xxxxxxxxxxx <mailto:weberr@xxxxxxxxxxx>

 

 

 

========================================================================

This email message is for the sole use of the intended recipient (s) and may

contain confidential and privileged information. Any unauthorized review,

use, disclosure or distribution is prohibited. If you are not the intended

recipient, please contact the sender by reply email and destroy all copies

of the original message. To reply to our email administrator directly, send

an email to EmailAdmin@xxxxxxxxxxxx

Toys "R" Us, Inc.

--

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.

 

.