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

NYBU#28784 RES: ondersteunen 'wachtrij' of 'opties'

Browse Source 
svn path=/Database/trunk/; revision=21795
This commit is contained in:
Erik Groener
2014-06-03 08:35:38 +00:00
parent a0f74cd22d
commit 099853de8f
2 changed files with 18 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
FAC/FAC_INI.SRC
View File

@@ -1985,6 +1985,7 @@ DEF_FAC_SRTNOT('RESDIR', 3, 'Let op: reservering ##KEY## (##DESC##) is ongeldig!
DEF_FAC_SRTNOT('RESCPY', 1, 'Uw reserveringsreeks ##KEY## (##DESC##) is uitgebreid', 'res/res_reservering.asp?rsv_ruimte_key=', '0', 'xreservering', 0);
DEF_FAC_SRTNOT('RESMLT', 1, 'Uw reserveringreeks ##KEY## (##DESC##) is aangepast', 'res/res_reservering.asp?rsv_ruimte_key=', '0', 'xreservering', 0);
DEF_FAC_SRTNOT('RESKTO', 3, 'Uw mening over de behandeling van reservering ##KEY## (##DESC##)', 'mld/mld_melding.asp?kto=1&res_key=', '0', 'reservering', 0);
DEF_FAC_SRTNOT('RESCLN', 0, 'Uw voorkeursreservering ##KEY## (##DESC##) is geldig geworden', '', '0', 'reservering', 0);
DEF_FAC_SRTNOT('INSNEW', 0, 'Object geregistreerd', 'ins/ins_deel.asp?ins_key=', '0', 'deel', 0);
DEF_FAC_SRTNOT('INSUPD', 0, 'Object gewijzigd', 'ins/ins_deel.asp?ins_key=', '0', 'deel', 60);

17
RES/RES_PAC.SRC
View File

@@ -438,6 +438,9 @@ AS
-- checkdate is op zich redundant maar heel goed voor de performance
PROCEDURE set_ruimtes_clean (checkdate IN DATE)
AS
res_key res_rsv_ruimte.res_reservering_key%TYPE;
dirtlevel res_rsv_ruimte.res_rsv_ruimte_dirtlevel%TYPE;
contact_key res_rsv_ruimte.res_rsv_ruimte_contact_key%TYPE;
BEGIN
FOR prsv_ruimte
IN (SELECT res_rsv_ruimte_key
@@ -446,6 +449,20 @@ AS
AND res_rsv_ruimte_van BETWEEN TRUNC (checkdate) AND TRUNC (checkdate + 1))
loop
set_ruimte_dirty (prsv_ruimte.res_rsv_ruimte_key);
--
SELECT res_reservering_key,
res_rsv_ruimte_dirtlevel,
res_rsv_ruimte_contact_key
INTO res_key,
dirtlevel,
contact_key
FROM res_rsv_ruimte
WHERE res_rsv_ruimte_key = prsv_ruimte.res_rsv_ruimte_key;
--
IF dirtlevel = 0 THEN
fac.putnotificationsrtprio (NULL, contact_key, 'RESCLN', res_key,
NULL, NULL, NULL, NULL, NULL, 2, NULL);
END IF;
-- TODO: Alle ruimtes met Dirty-bitje bekijken
end loop;
END;