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=20383
This commit is contained in:
Maykel Geerdink
2014-01-21 10:01:39 +00:00
parent d59624ac39
commit c4a15204e6
1 changed files with 11 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
RES/RES_PAC.SRC
View File

@@ -1330,13 +1330,17 @@ AS
thisroomprice := thisroomprice * COALESCE(ruimte_prijsfactor_intern,fac.safe_to_number (fac.getsetting ('res_ruimte_prijsfactor_intern'))); thisroomprice := thisroomprice * COALESCE(ruimte_prijsfactor_intern,fac.safe_to_number (fac.getsetting ('res_ruimte_prijsfactor_intern')));
END IF; 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 -- Hier wordt een eventuele korting bij de reservering (door FO ingevoerd) nog verrekend: zie NYBU#25763
thisroomprice := thisroomprice - res_rsv_korting; thisroomprice := thisroomprice - res_rsv_korting;
-- Doorbelastingspercentage (bij annuleren) op het laatste moment nog. -- Doorbelastingspercentage (bij annuleren) op het laatste moment nog.
thisroomprice := thisroomprice * doorbelasting / 100; thisroomprice := thisroomprice * doorbelasting / 100;
RETURN thisroomprice; -- De uiteindelijke ruimteprijs die afgeleverd wordt (return waarde) moet een op twee decimalen afgeronde prijs zijn. Vanwege doorbelasging opnieuw afronden.
RETURN ROUND(thisroomprice, 2);
END; END;
FUNCTION getdeelprijs (pres_rsv_deel_key IN NUMBER) FUNCTION getdeelprijs (pres_rsv_deel_key IN NUMBER)
@@ -1424,6 +1428,8 @@ AS
END IF; END IF;
END IF; END IF;
END IF; END IF;
-- De uiteindelijke artikelprijs die afgeleverd wordt (return waarde) moet een op twee decimalen afgeronde prijs zijn.
-- Afronden op twee decimalen gaat automatisch omdat deel_price_total twee decimalen heeft.
deel_price_total := deel_price * res_deel_length; deel_price_total := deel_price * res_deel_length;
RETURN deel_price_total; RETURN deel_price_total;
END; END;
@@ -1474,7 +1480,8 @@ AS
AND ra.res_artikel_key = a.res_artikel_key AND ra.res_artikel_key = a.res_artikel_key
AND res_rsv_artikel_prijs IS NOT NULL AND res_rsv_artikel_prijs IS NOT NULL
AND (res_status_bo_key >= 5 OR res_artikel_prijs_vast <> 1); AND (res_status_bo_key >= 5 OR res_artikel_prijs_vast <> 1);
RETURN artikel_price_total * doorbelasting / 100; -- De uiteindelijke artikelprijs die afgeleverd wordt (return waarde) moet een op twee decimalen afgeronde prijs zijn. Vanwege doorbelasting opnieuw afronden.
RETURN ROUND(artikel_price_total * doorbelasting / 100, 2);
EXCEPTION EXCEPTION
WHEN OTHERS WHEN OTHERS
THEN THEN
@@ -1487,7 +1494,8 @@ AS
INTO artikel_price_total INTO artikel_price_total
FROM res_rsv_artikel ra, res_artikel a FROM res_rsv_artikel ra, res_artikel a
WHERE ra.res_artikel_key = a.res_artikel_key AND ra.res_rsv_artikel_key = pres_rsv_artikel_key; WHERE ra.res_artikel_key = a.res_artikel_key AND ra.res_rsv_artikel_key = pres_rsv_artikel_key;
RETURN artikel_price_total * doorbelasting / 100; -- De uiteindelijke artikelprijs die afgeleverd wordt (return waarde) moet een op twee decimalen afgeronde prijs zijn. Vanwege doorbelasting opnieuw afronden.
RETURN ROUND(artikel_price_total * doorbelasting / 100, 2);
END; END;
-- Bepaal de totaalprijs van een reservering -- Bepaal de totaalprijs van een reservering
FUNCTION getdeelresprijs (pres_rsv_ruimte_key IN NUMBER) FUNCTION getdeelresprijs (pres_rsv_ruimte_key IN NUMBER)