KFNS#34395 Toekennen @nedtrain-rol+KFNS#34522 Toekennen niet-@nsstations-rol

svn path=/Customer/trunk/; revision=27296
This commit is contained in:
Maarten van der Heide
2015-12-04 11:58:25 +00:00
parent 31e96ec9be
commit 9076df88cb

View File

@@ -1646,7 +1646,9 @@ END;
-- Dummy export AUTOCLOSE (elk kwartier zoals voor OPDRSTAT_STRUKTON-import en -- Dummy export AUTOCLOSE (elk kwartier zoals voor OPDRSTAT_STRUKTON-import en
-- RES_RUIMTE_XML-export)! -- RES_RUIMTE_XML-export)!
/* Formatted on 8-10-2015 15:48:12 (QP5 v5.136.908.31019) */ -- KFNS#34395: En toekennen/afpakken fac_groep_key=122 (aan @nedtrain-ers).
-- KFNS#34522: En toekennen/afpakken fac_groep_key=681 (aan niet-@nsstation-ers).
/* Formatted on 30-11-2015 22:22:22 (QP5 v5.136.908.31019) */
CREATE OR REPLACE PROCEDURE kfns_select_autoclose (p_applname IN VARCHAR2, CREATE OR REPLACE PROCEDURE kfns_select_autoclose (p_applname IN VARCHAR2,
p_applrun IN VARCHAR2) p_applrun IN VARCHAR2)
AS AS
@@ -1690,6 +1692,7 @@ AS
v_errormsg VARCHAR2 (1000); v_errormsg VARCHAR2 (1000);
oracle_err_num NUMBER; oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200); oracle_err_mes VARCHAR2 (200);
v_count NUMBER;
BEGIN BEGIN
FOR rec IN cboi FOR rec IN cboi
LOOP LOOP
@@ -1717,6 +1720,99 @@ BEGIN
bes.updatebestellingstatus (rec.bes_bestelling_key, NULL); bes.updatebestellingstatus (rec.bes_bestelling_key, NULL);
END LOOP; END LOOP;
COMMIT;
v_errormsg := 'Fout toekennen @nedtrain.nl-rol';
SELECT COUNT ( * )
INTO v_count
FROM prs_perslid p
WHERE UPPER (p.prs_perslid_email) LIKE '%@NEDTRAIN.NL%'
AND NOT EXISTS
(SELECT 1
FROM fac_gebruikersgroep gg
WHERE gg.fac_groep_key = 122
AND gg.prs_perslid_key = p.prs_perslid_key);
INSERT INTO fac_gebruikersgroep (fac_groep_key, prs_perslid_key)
SELECT 122, prs_perslid_key
FROM prs_perslid p
WHERE UPPER (p.prs_perslid_email) LIKE '%@NEDTRAIN.NL%'
AND NOT EXISTS -- Nog niet in autorisatiegroep 122!
(SELECT 1
FROM fac_gebruikersgroep gg
WHERE gg.fac_groep_key = 122
AND gg.prs_perslid_key = p.prs_perslid_key);
COMMIT;
/*
v_errormsg := 'Fout afpakken @nedtrain.nl-rol';
SELECT COUNT ( * )
INTO v_count
FROM fac_gebruikersgroep gg
WHERE gg.fac_groep_key = 122
AND NOT EXISTS
(SELECT 1
FROM prs_perslid p
WHERE UPPER (p.prs_perslid_email) LIKE '%@NEDTRAIN.NL%'
AND p.prs_perslid_key = gg.prs_perslid_key);
DELETE FROM fac_gebruikersgroep gg
WHERE gg.fac_groep_key = 122
AND NOT EXISTS
(SELECT 1
FROM prs_perslid p
WHERE UPPER (p.prs_perslid_email) LIKE '%@NEDTRAIN.NL%'
AND p.prs_perslid_key = gg.prs_perslid_key);
COMMIT;
*/
v_errormsg := 'Fout toekennen niet-@nsstations.nl-rol';
SELECT COUNT ( * )
INTO v_count
FROM prs_perslid p
WHERE UPPER (p.prs_perslid_email) NOT LIKE '%@NSSTATIONS.NL%'
AND NOT EXISTS
(SELECT 1
FROM fac_gebruikersgroep gg
WHERE gg.fac_groep_key = 681
AND gg.prs_perslid_key = p.prs_perslid_key);
INSERT INTO fac_gebruikersgroep (fac_groep_key, prs_perslid_key)
SELECT 681, prs_perslid_key
FROM prs_perslid p
WHERE UPPER (p.prs_perslid_email) NOT LIKE '%@NSSTATIONS.NL%'
AND NOT EXISTS -- Nog niet in autorisatiegroep 681!
(SELECT 1
FROM fac_gebruikersgroep gg
WHERE gg.fac_groep_key = 681
AND gg.prs_perslid_key = p.prs_perslid_key);
COMMIT;
/*
v_errormsg := 'Fout afpakken niet-@nsstations.nl-rol';
SELECT COUNT ( * )
INTO v_count
FROM fac_gebruikersgroep gg
WHERE gg.fac_groep_key = 681
AND EXISTS
(SELECT 1
FROM prs_perslid p
WHERE UPPER (p.prs_perslid_email) LIKE '%@NSSTATIONS.NL%'
AND p.prs_perslid_key = gg.prs_perslid_key);
DELETE FROM fac_gebruikersgroep gg
WHERE gg.fac_groep_key = 681
AND EXISTS
(SELECT 1
FROM prs_perslid p
WHERE UPPER (p.prs_perslid_email) LIKE '%@NSSTATIONS.NL%'
AND p.prs_perslid_key = gg.prs_perslid_key);
*/
EXCEPTION EXCEPTION
WHEN OTHERS WHEN OTHERS
THEN THEN
@@ -1727,6 +1823,7 @@ EXCEPTION
END kfns_select_autoclose; END kfns_select_autoclose;
/ /
/* Formatted on 12-9-2014 17:42:24 (QP5 v5.136.908.31019) */ /* Formatted on 12-9-2014 17:42:24 (QP5 v5.136.908.31019) */
CREATE OR REPLACE VIEW kfns_v_imp_bes_artikel_sync CREATE OR REPLACE VIEW kfns_v_imp_bes_artikel_sync
( (
@@ -2777,7 +2874,7 @@ AS
BEGIN adm.systrackscriptId('$Id$', 0); END; BEGIN adm.systrackscriptId('$Id$', 0); END;
/ /
BEGIN fac.registercustversion('KFNS', 8); END; BEGIN fac.registercustversion('KFNS', 9); END;
/ /
commit; commit;
spool off spool off