RE: Eval(h)

["Mackie, Roger L. (Precision Press)" <RLMackie@xxxxxxxxxxxxx>]

Kyle,

I suspect the answer lies in the expression precision rules for numeric
operations (ILE RPG Reference Chapter 21). Because 2 is your maximum
decimal places, the intermediate results of each element of your
expression are 2 decimal places instead of the 4 you show in your
example. You will probably need 7,4field on your expression, then assign
Eval(H) 5,2field = 7,4field.

HTH,
Roger Mackie


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of RPower@xxxxxxxxxx
Sent: Thursday, May 19, 2005 8:29
To: RPG programming on the AS400 / iSeries
Subject: Re: Eval(h)

I get same result with fixed format.  Strange.

Ron Power
Programmer
Information Services
City Of St. John's, NL
P.O. Box 908
St. John's, NL
A1C 5M2
Tel: 709-576-8132
Email: rpower@xxxxxxxxxx
Website: http://www.stjohns.ca/
________________________________________________________________________
___
Success is going from failure to failure without a loss of enthusiasm. -
Sir Winston Churchill




Kyle Collie <kcollie@xxxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
19/05/2005 10:23 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
Midrange RPG List <rpg400-l@xxxxxxxxxxxx>
cc

Subject
Eval(h)






In free-form code, I have:

eval(h) 5,2field    = 9,2field / (9,0field /100);

It is not rounding up. For example, a result of 11.77815... is
truncated to 11.77, not the expected (at least expected by me) 11.78.

What am I missing?

Kyle