Subject: RE: RPG math From: Paul Therrien Date: Thu, 12 Apr 2012 19:22:05 +0000 List-archive: List-help: List-id: RPG programming on the IBM i / System i List-post: List-subscribe: , List-unsubscribe: ,

"Function Junction"?!
I am having ABC Saturday morning cartoon flashbacks! =)

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Mike Cunningham
Sent: Thursday, April 12, 2012 1:44 PM
To: RPG programming on the IBM i / System i
Subject: RE: RPG math

Look into http://www.gsssi.com/fjentry.html

FINANCES
Fin_ACP() - Average Collection Period........................................................................................... 75
Fin_Ann() - Regular Annuity........................................................................................................... 76
Fin_AnnD() - Annuity Due................................................................................................................. 77
Fin_CI() - Compound Interest Calculations.................................................................................. 78
Fin_CR() - Current Ratio................................................................................................................ 79
Fin_DR() - Debt Ratio .................................................................................................................... 80
Fin_EOQ() - Economic Order Quantity ............................................................................................ 81
Fin_IT() - Inventory Turnover Ratio............................................................................................. 82
Fin_NPM() - Net Profit Margin......................................................................................................... 83
Fin_PE() - Price Earnings Ratio .................................................................................................... 84
Fin_POR() - Payout Ratio................................................................................................................. 85
Fin_QR() - Quick Ratio (aka Acid Test) ........................................................................................ 86
Fin_ROA() - Return on Assets .......................................................................................................... 87
Fin_ROE() - Return on Equity.......................................................................................................... 88
Fin_RT() - Receivable Turnover .................................................................................................... 89
Fin_SI() - Simple Interest Calculations ........................................................................................ 90

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of John Yeung
Sent: Thursday, April 12, 2012 12:26 PM
To: RPG programming on the IBM i / System i
Subject: Re: RPG math

On Thu, Apr 12, 2012 at 6:55 AM, Dave <dfx1@xxxxxxxxxxxxxx> wrote:
I am now having to reproduce the EXCEL PMT function in RPG. Maybe

I'm sure it's been done thousands of times by now. ;) But it's probably squirreled away in thousands of ad-hoc programs.

Anyway, I've been given a formula to code and an EXCEL spreadsheet to
control my results.

Which I've coded like this :

MonthlyRate = interestRate /12;
MonthlyPayment = ( LoanAmount / MonthlyRate ) *  ( 1 - ( 1 +
MonthlyRate ) ** ( -1  * numberOfPayments ));

I think we may have bigger problems here than whether to use decimals or floats. Are you sure that's the formula?

(I haven't looked carefully at the LoanRemaining calculation, but I figure it's better to concentrate on one formula at a time in any
case.)

John
--
This is the RPG programming on the IBM i / System i (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 IBM i / System i (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.