RE: Decimals in division

["Koester, Michael" <mkoester@xxxxxxxxxxxxx>]

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