Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- CREATE OR REPLACE FUNCTION "BEREKEN_RENTE"
- (in_bedrag IN INTEGER,
- in_rente IN INTEGER,
- in_date IN DATE,
- yes_no IN CHAR)
- RETURN NUMBER
- IS
- Resultaat NUMBER;
- maanden NUMBER;
- temp NUMBER;
- jaren NUMBER;
- BEGIN
- --
- SELECT MONTHS_BETWEEN(TO_DATE (SYSDATE), TO_DATE (in_date)) INTO maanden FROM dual;
- --
- temp := MOD(maanden, 12);
- jaren := (maanden - temp) / 12;
- maanden := temp;
- Resultaat := in_bedrag * POWER((in_rente / 100) + 1, jaren);
- --
- IF maanden >= 6 THEN
- Resultaat := Resultaat * (((in_rente / 2) / 100) + 1);
- END IF;
- Resultaat := ROUND(Resultaat, 2);
- --
- IF yes_no = 'Y' THEN
- Resultaat := 0;
- END IF;
- --
- RETURN Resultaat;
- END;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement