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

LOGI#66401 -- Flexplekken reserveren met Facilitor.

Browse Source 
svn path=/Customer/trunk/; revision=52097
This commit is contained in:
Arthur Egberink
2021-06-25 13:15:07 +00:00
parent 0d9d6345e0
commit daefb5d448
1 changed files with 61 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

61
LOGI/logi.sql
View File

@@ -18,6 +18,67 @@ SET DEFINE OFF
------ payload begin ------
CREATE OR REPLACE PACKAGE LOGI
AS
FUNCTION res_presave (p_user_key IN NUMBER,
p_rsv_ruimte_key IN NUMBER,
p_activiteit_key IN NUMBER,
p_res_deel_key IN NUMBER,
p_datum_van IN DATE,
p_datum_tot IN DATE,
p_volgnr IN NUMBER)
RETURN VARCHAR2;
END;
/
CREATE OR REPLACE PACKAGE BODY LOGI
AS
FUNCTION res_presave (p_user_key IN NUMBER,
p_rsv_ruimte_key IN NUMBER,
p_activiteit_key IN NUMBER,
p_res_deel_key IN NUMBER,
p_datum_van IN DATE,
p_datum_tot IN DATE,
p_volgnr IN NUMBER)
RETURN VARCHAR2
AS
v_result VARCHAR2 (300);
v_date DATE;
v_count NUMBER;
v_discipline_key NUMBER;
BEGIN
v_result := 'OK';
IF p_activiteit_key = 321 -- Flexplek
THEN
SELECT count(*)
INTO v_count
FROM res_rsv_ruimte rrr
WHERE rrr.res_rsv_ruimte_verwijder IS NULL
AND rrr.res_activiteit_key = 321 -- 321 Flexplek
AND rrr.res_rsv_ruimte_host_key = p_user_key
AND rrr.res_rsv_ruimte_key <> p_rsv_ruimte_key
AND TRUNC(res_rsv_ruimte_van, 'IW') = TRUNC (p_datum_tot, 'IW');
IF v_count > 0
THEN
v_result := 'Beste collega,' || CHR(10) ||
'We hebben deze maand al vier reserveringen van je gevonden. Je maximaal aantal te reserveren werkplekken per week is dus bereikt.' || CHR(10) ||
'Hartelijke groet, CGI Facilities';
END IF;
END IF;
RETURN v_result;
END;
END;
/
CREATE OR REPLACE PROCEDURE logi_import_persoon (p_import_key IN NUMBER)
AS
v_errormsg VARCHAR2 (1000) := '';