admin/Database
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

NYBU#28495: AiAi afmelden reserveringen met negatief bedrag.

Browse Source 
svn path=/Database/trunk/; revision=20501
This commit is contained in:
Maykel Geerdink
2014-01-30 14:24:22 +00:00
parent 23fa302d34
commit 66307acfd2
3 changed files with 14 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
RES/RES_PAC.SRC
View File

@@ -1330,16 +1330,11 @@ AS
thisroomprice := thisroomprice * COALESCE(ruimte_prijsfactor_intern,fac.safe_to_number (fac.getsetting ('res_ruimte_prijsfactor_intern')));
END IF;
-- De uiteindelijke ruimteprijs die afgeleverd wordt (return waarde) moet een op twee decimalen afgeronde prijs zijn.
thisroomprice := ROUND(thisroomprice, 2);
-- Hier wordt een eventuele korting bij de reservering (door FO ingevoerd) nog verrekend: zie NYBU#25763
thisroomprice := thisroomprice - res_rsv_korting;
-- Doorbelastingspercentage (bij annuleren) op het laatste moment nog.
thisroomprice := thisroomprice * doorbelasting / 100;
-- Voor de berekening van de doorbelasting moet gerekend worden met een op twee decimalen afgeronde ruimteprijs.
thisroomprice := ROUND(thisroomprice, 2) * doorbelasting / 100;
-- De uiteindelijke ruimteprijs die afgeleverd wordt (return waarde) moet een op twee decimalen afgeronde prijs zijn. Vanwege doorbelasging opnieuw afronden.
-- De uiteindelijke ruimteprijs die afgeleverd wordt (return waarde) moet een op twee decimalen afgeronde prijs zijn. Vanwege doorbelasting opnieuw afronden.
RETURN ROUND(thisroomprice, 2);
END;
@@ -1503,6 +1498,7 @@ AS
ruimteprijs NUMBER := 0;
artikelprijs NUMBER := 0;
deelprijs NUMBER := 0;
korting NUMBER := 0;
CURSOR cartikel
IS
SELECT res_rsv_artikel_key
@@ -1525,7 +1521,13 @@ AS
loop
deelprijs := deelprijs + res.getdeelprijs(cd.res_rsv_deel_key);
end loop;
RETURN ruimteprijs + artikelprijs + deelprijs;
SELECT res_rsv_ruimte_korting
INTO korting
FROM res_rsv_ruimte
WHERE res_rsv_ruimte_key = pres_rsv_ruimte_key;
RETURN ruimteprijs + artikelprijs + deelprijs - korting;
END;
FUNCTION sprintf (ps IN VARCHAR2 , pres_rsv_ruimte_key IN NUMBER)
RETURN VARCHAR2 IS