×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
Raul, the definitive explanation for RPG math is a post by Scott Klement back in August. It's involved, but a "must-read" for all of us. The link to the post in the archives is:
http://archive.midrange.com/rpg400-l/200908/msg00069.html
Enjoy!
Michael Koester
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Raul A. Jager W.
Sent: Wednesday, January 20, 2010 9:23 AM
To: RPG programming on the IBM i / System i
Subject: Decimals in division
I tryed to calculate a discount using:
neto$ = imp$ / ( 1 + porciva /100);
where neto$ and imp$ are defined as 13, 2
I expected two decimals, but instead I got an integer value in neto$.
I found a "solution" using:
neto$ = %dec(imp$ / ( 1 + porciva /100): 13: 2);
Works fine, but looks more complicated than necesary.
Why the original eval did give me an integer?
TIA
Raúl
midrange.com
