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

BLST#76842 Opruimscript (BLST025) leidt tot slecht functionerende website

Browse Source 
svn path=/Customer/trunk/; revision=59275
This commit is contained in:
Suzan Wiegerinck
2023-02-22 17:21:49 +00:00
parent 02fde7820c
commit 26185c9654
1 changed files with 10 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
BLST/BLST.sql
View File

@@ -6087,8 +6087,11 @@ BEGIN
END;
/
--de weekly task draait elke zondagochtend
CREATE OR REPLACE PROCEDURE blst_weekly
CREATE OR REPLACE PROCEDURE blst_export_werkplekken (
p_applname IN VARCHAR2,
p_applrun IN VARCHAR2,
p_filedir IN VARCHAR2,
p_filename IN VARCHAR2)
AS
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
@@ -6112,7 +6115,7 @@ AS
UNION ALL
SELECT a.prs_afdeling_key,
p.prs_perslid_key,
p.PRS_PERSLID_NAAM,
p.prs_perslid_naam,
a.prs_afdeling_upper
FROM prs_afdeling a, prs_perslid p
WHERE a.prs_afdeling_key = 21
@@ -6176,7 +6179,7 @@ AS
AND EXISTS
(SELECT prs_afdeling_key
FROM prs_afdeling a
WHERE a.prs_afdeling_parentkey = 21
WHERE a.prs_afdeling_parentkey = 21
AND p.prs_afdeling_key = a.prs_afdeling_key)
AND NOT EXISTS
(SELECT pw.prs_perslid_key
@@ -6246,9 +6249,8 @@ AS
AND w.prs_alg_ruimte_key = wp.alg_ruimte_key
AND pw.prs_perslid_key = prs.prs_perslid_key);
BEGIN
-- we gooien alle werkplekken weg en beginnen daarna opnieuw
DELETE prs_perslidwerkplek;
DELETE prs_perslidwerkplek;
FOR REC IN intern
LOOP
@@ -6281,7 +6283,8 @@ BEGIN
v_perslid_key := rec.prs_perslid_key;
v_aanduiding := 'Perslidkey: ' || rec.prs_perslid_key;
v_errorhint :=
'Afdelingsspec. werkplek koppelen voor BD perslid: ' || rec.prs_perslid_key;
'Afdelingsspec. werkplek koppelen voor BD perslid: '
|| rec.prs_perslid_key;
BEGIN
prs.movetoruimte (v_perslid_key, rec.alg_ruimte_key, '');
@@ -6328,7 +6331,6 @@ BEGIN
END LOOP;
END;
/
CREATE OR REPLACE VIEW BLST_V_RAP_RES_MOB
(
HIDE_F_SRT,