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

NYBU#29378: Verwijderde reserveringen krijgen negatief saldo.

Browse Source 
svn path=/Database/trunk/; revision=21659
This commit is contained in:
Maykel Geerdink
2014-05-20 13:50:48 +00:00
parent 3594f02e4b
commit f00acb6b71
1 changed files with 20 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
RES/RES_PAC.SRC
View File

@@ -1499,6 +1499,8 @@ AS
artikelprijs NUMBER := 0; artikelprijs NUMBER := 0;
deelprijs NUMBER := 0; deelprijs NUMBER := 0;
korting NUMBER := 0; korting NUMBER := 0;
verwijderdatum res_rsv_ruimte.res_rsv_ruimte_verwijder%TYPE;
statusfokey res_rsv_ruimte.res_status_fo_key%TYPE;
CURSOR cartikel CURSOR cartikel
IS IS
SELECT res_rsv_artikel_key SELECT res_rsv_artikel_key
@@ -1522,10 +1524,24 @@ AS
deelprijs := deelprijs + res.getdeelprijs(cd.res_rsv_deel_key); deelprijs := deelprijs + res.getdeelprijs(cd.res_rsv_deel_key);
end loop; end loop;
SELECT COALESCE(res_rsv_ruimte_korting, 0) -- Is de reservering verwijderd
INTO korting SELECT rrr.res_rsv_ruimte_verwijder,
FROM res_rsv_ruimte rrr.res_status_fo_key
WHERE res_rsv_ruimte_key = pres_rsv_ruimte_key; INTO verwijderdatum,
statusfokey
FROM res_rsv_ruimte rrr
WHERE rrr.res_rsv_ruimte_key = pres_rsv_ruimte_key;
-- Bepaal doorbelasting korting
IF verwijderdatum IS NOT NULL AND statusfokey != 4 -- Verwijderde reservering met FO status die niet is vervallen: 0% korting doorberekenen.
THEN
korting := 0;
ELSE -- Actuele reservering of verwijderde reservering met FO status is vervallen: 100% korting doorberekenen
SELECT COALESCE(res_rsv_ruimte_korting, 0)
INTO korting
FROM res_rsv_ruimte
WHERE res_rsv_ruimte_key = pres_rsv_ruimte_key;
END IF;
RETURN ruimteprijs + artikelprijs + deelprijs - korting; RETURN ruimteprijs + artikelprijs + deelprijs - korting;
END; END;