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

BLOS#79136 -- Systematiek Locatieleiders en Werkplekkoppelingen - HERZIEN

Browse Source 
svn path=/Customer/trunk/; revision=61405
This commit is contained in:
Jos Migo
2023-08-08 14:06:11 +00:00
parent bf5a356e15
commit b5e0f9dd67
1 changed files with 473 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

493
BLOS/blos.sql
View File

@@ -254,9 +254,14 @@ END;
----- 2. Locatiekaart en gekoppelde locatieleider - NIEUW 2023-juli ---
-------------------------------------------------------------------------
------------------------------------------------
-- 2. Personenkaart vinlkboxen Cluster/Label ---
------------------------------------------------
--------------------------------------------------------------------
-- 2. Locatiekaart en gekoppelde locatieleider - NIEUW 2023-juli ---
--------------------------------------------------------------------
-- Inpassen systematiek om werkplekkoppelingen te genereren op basis locatiekaart => Gelijk aan oplossing GOKO
---- ter vervanging EXPORT WPCLUSTER
---- Bij GOKO zit deze in de IMPORT PERSLID... , bij BLOS apart houden omdat pas later een AFAS-intergratie komt, eerst apart houden WPMANAGER...
-- Lijst van Locatieleiders (tbv domeinview)
CREATE OR REPLACE VIEW blos_v_personenlijst_loc
@@ -264,7 +269,8 @@ CREATE OR REPLACE VIEW blos_v_personenlijst_loc
PRS_PERSLID_KEY,
NAAM,
PERSONEELSNUMMER,
EMAIL
EMAIL,
PRS_PERSLID_VERWIJDER
)
AS
SELECT
@@ -275,7 +281,8 @@ AS
END
naam,
p.prs_perslid_nr,
p.prs_perslid_email
p.prs_perslid_email,
p.prs_perslid_verwijder
FROM
prs_perslid p,
prs_srtperslid sp,
@@ -287,17 +294,18 @@ AS
AND b.prs_bedrijf_key = 21 -- bedrijfs_key BLOS
AND p.prs_srtperslid_key = sp.prs_srtperslid_key
AND sp.prs_srtperslid_key = 25 --- LOCATIEMANAGER
AND p.prs_perslid_verwijder IS NULL
-- AND p.prs_perslid_verwijder IS NULL
ORDER BY p.prs_perslid_naam
;
-- Lijst van Cluster/Districtleiders (tbv domeinview)
-- Lijst van Regiomanagers ((Cluster/District) (tbv domeinview)
CREATE OR REPLACE VIEW blos_v_personenlijst_clus
(
PRS_PERSLID_KEY,
NAAM,
PERSONEELSNUMMER,
EMAIL
EMAIL,
PRS_PERSLID_VERWIJDER
)
AS
SELECT
@@ -308,7 +316,8 @@ AS
END
naam,
p.prs_perslid_nr,
p.prs_perslid_email
p.prs_perslid_email,
p.prs_perslid_verwijder
FROM
prs_perslid p,
prs_srtperslid sp,
@@ -320,18 +329,363 @@ AS
AND b.prs_bedrijf_key = 21 -- bedrijfs_key BLOS
AND p.prs_srtperslid_key = sp.prs_srtperslid_key
AND sp.prs_srtperslid_key = 4181 --- REGIOEMANAGER
AND p.prs_perslid_verwijder IS NULL
-- AND p.prs_perslid_verwijder IS NULL
ORDER BY p.prs_perslid_naam
;
-- Inpassen systematiek om werkplekkoppelingen te genereren op basis locatiekaart => Gelijk aan oplossing GOKO
---- ter vervanging EXPORT WPCLUSTER
---- Bij GOKO zit deze in de IMPORT PERSLID... , bij BLOS apart houden omdat pas later een AFAS-intergratie komt...
-- Lijst van Regio-directeuren (tbv domeinview)
CREATE OR REPLACE VIEW blos_v_personenlijst_dir
(
PRS_PERSLID_KEY,
NAAM,
PERSONEELSNUMMER,
EMAIL,
PRS_PERSLID_VERWIJDER
)
AS
SELECT
p.prs_perslid_key,
CASE WHEN p.prs_perslid_tussenvoegsel IS NULL
THEN p.prs_perslid_voornaam || ' ' || p.prs_perslid_naam || ' (' || sp.prs_srtperslid_omschrijving || ')'
ELSE p.prs_perslid_voornaam || ' ' || p.prs_perslid_tussenvoegsel || ' ' || p.prs_perslid_naam || ' (' || sp.prs_srtperslid_omschrijving || ')'
END
naam,
p.prs_perslid_nr,
p.prs_perslid_email,
p.prs_perslid_verwijder
FROM
prs_perslid p,
prs_srtperslid sp,
prs_v_afdeling a,
prs_bedrijf b
WHERE
p.prs_afdeling_key = a.prs_afdeling_key
AND a.prs_bedrijf_key = b.prs_bedrijf_key
AND b.prs_bedrijf_key = 21 -- bedrijfs_key BLOS
AND p.prs_srtperslid_key = sp.prs_srtperslid_key
AND sp.prs_srtperslid_key = 10701 --- REGIO-DIRECTEUR
-- AND p.prs_perslid_verwijder IS NULL
ORDER BY p.prs_perslid_naam
;
-- Lijst van Locatieleiders/Vervangers en de locaties waar men verantwoordelijk voor is)
CREATE OR REPLACE VIEW blos_v_locatiemanagers
(
PRS_PERSLID_KEY,
ALG_LOCATIE_KEY,
LOCATIEMANAGER,
LOCATIE,
VERVANGER,
PRS_PERSLID_VERWIJDER
)
AS
SELECT p.prs_perslid_key,
l.alg_locatie_key,
p.prs_perslid_naam || ' (' || p.prs_perslid_voornaam || ' ' || p.prs_perslid_tussenvoegsel || ') - ' || sp.prs_srtperslid_omschrijving
locatiemanager,
l.alg_locatie_code || ' - ' || l.alg_locatie_omschrijving
locatie,
CASE WHEN ok.alg_kenmerk_key = 1163 THEN 'ja' ELSE 'nee' END
vervanger,
p.prs_perslid_verwijder
FROM prs_perslid p, prs_srtperslid sp, alg_onrgoedkenmerk ok, alg_locatie l
WHERE fac.safe_to_number(ok.alg_onrgoedkenmerk_waarde) = p.prs_perslid_key
AND ok.alg_kenmerk_key IN (1162, 1163) -- locatieleider en vervanger
AND ok.alg_onrgoedkenmerk_verwijder IS NULL
AND ok.alg_onrgoed_niveau = 'L' AND ok.alg_onrgoed_key = l.alg_locatie_key
AND l.alg_locatie_verwijder IS NULL
AND (TRUNC(l.alg_locatie_vervaldatum) > TRUNC(sysdate) OR l.alg_locatie_vervaldatum IS NULL )
AND p.prs_srtperslid_key = sp.prs_srtperslid_key
GROUP BY p.prs_perslid_key, l.alg_locatie_key,
p.prs_perslid_naam || ' (' || p.prs_perslid_voornaam || ' ' || p.prs_perslid_tussenvoegsel || ') - ' || sp.prs_srtperslid_omschrijving,
l.alg_locatie_code || ' - ' || l.alg_locatie_omschrijving,
CASE WHEN ok.alg_kenmerk_key = 1163 THEN 'ja' ELSE 'nee' END,
p.prs_perslid_verwijder ;
-- Lijst van Locatiemanagers + Cluster-managers en de Werkplekkoppeling die ze in hun personenkaart hebben
CREATE OR REPLACE VIEW blos_v_locatiemanagers_wp
(
PRS_PERSLID_KEY,
ALG_LOCATIE_KEY,
NAAM,
LOCATIE_WP,
PRS_WERKPLEK_KEY
)
AS
SELECT wp.prs_perslid_key,
onr.alg_locatie_key,
p.prs_perslid_naam_friendly,
l.alg_locatie_code || ' - ' || l.alg_locatie_omschrijving
locatie,
w.prs_werkplek_key
FROM (
SELECT prs_perslid_key
FROM (SELECT *
FROM blos_v_personenlijst_loc
) x
GROUP BY x.prs_perslid_key
) v,
prs_v_perslid_fullnames p, prs_perslidwerkplek wp, prs_werkplek w, alg_ruimte r, alg_v_onrgoed_boom onr, alg_locatie l
WHERE v.prs_perslid_key = p.prs_perslid_key
AND p.prs_perslid_key = wp.prs_perslid_key
AND wp.prs_werkplek_key = w.prs_werkplek_key
AND w.prs_alg_ruimte_key = r.alg_ruimte_key
AND r.alg_ruimte_key = onr.alg_ruimte_key
AND onr.alg_locatie_key = l.alg_locatie_key
ORDER BY wp.prs_perslid_key
;
-- Views nodig maar al in -- 1. vinkboxen Cluster/Label -- :
--- Bronview: Alle locaties met haar kostenplaats(en): blos_v_locaties_kp
--- Bronview: Alle werkplek-koppeling per locatiemanager en de kp's die daarbij vanuit locatiekaart bijhoren: blos_v_locaties_wp_kp
------------------------------------------------
-- 1. Personenkaart vinlkboxen Cluster/Label ---
------------------------------------------------
--- DE PROCEDURE om voor de Locatiemanagers van de CLUSTERS de juiste CLUSTER-LOCATIES te koppelen als werkplek
CREATE OR REPLACE VIEW blos_v_export_wp_loc_manager
(
result,
result_order
)
AS
SELECT '"SYNC - Werkplekkoppeling Locatiemanager (incl. zijn/haar Mandaten)"'
|| ';"Uitgevoerd"',
0
FROM DUAL ;
CREATE OR REPLACE PROCEDURE blos_select_wp_loc_manager (
p_applname IN VARCHAR2,
p_applrun IN VARCHAR2)
AS
-- Werkplekkoppelingen toevoegen
CURSOR c_loc_wp -- Voor updaten van locatieleiders (werkplek-koppelingen)
IS
SELECT v.prs_perslid_key,
v.alg_locatie_key,
v.prs_werkplek_key,
v.actie
FROM (SELECT man.prs_perslid_key,
man.alg_locatie_key,
NULL prs_werkplek_key,
'toevoegen' actie
FROM blos_v_locatiemanagers man
WHERE NOT EXISTS
(SELECT *
FROM blos_v_locatiemanagers_wp wp
WHERE wp.alg_locatie_key =
man.alg_locatie_key
AND wp.prs_perslid_key =
man.prs_perslid_key)
UNION
SELECT wp.prs_perslid_key,
wp.alg_locatie_key,
wp.prs_werkplek_key,
'verwijderen' actie
FROM blos_v_locatiemanagers_wp wp
WHERE NOT EXISTS
(SELECT *
FROM blos_v_locatiemanagers man
WHERE man.alg_locatie_key =
wp.alg_locatie_key
AND man.prs_perslid_key =
wp.prs_perslid_key)
UNION
SELECT wp.prs_perslid_key,
wp.alg_locatie_key,
wp.prs_werkplek_key,
'ok' actie
FROM blos_v_locatiemanagers_wp wp,
blos_v_locatiemanagers man
WHERE man.alg_locatie_key = wp.alg_locatie_key
AND man.prs_perslid_key = wp.prs_perslid_key) v
ORDER BY 1, 2, 3;
CURSOR c_loc_kp -- Voor updaten van locatiemanagers (mandaten op kostenplaatsen)
IS
SELECT w.prs_perslid_key, w.alg_locatie_key, w.prs_kostenplaats_key
FROM ( SELECT v_prs.prs_perslid_key,
v_prs.alg_locatie_key,
v_kp.prs_kostenplaats_key
FROM blos_v_locatiemanagers v_prs, blos_v_locaties_kp v_kp
WHERE v_prs.alg_locatie_key = v_kp.alg_locatie_key
GROUP BY v_prs.prs_perslid_key,
v_prs.alg_locatie_key,
v_kp.prs_kostenplaats_key) w
ORDER BY 1, 2, 3;
CURSOR c_loc_kp_del -- Voor deleten van mandaten die niet meer van toepassing zijn
IS
SELECT pk.prs_perslid_key, pk.prs_perslidkostenplaats_key
FROM prs_perslidkostenplaats pk
WHERE NOT EXISTS
( SELECT v_prs.prs_perslid_key,
v_kp.prs_kostenplaats_key
FROM blos_v_locatiemanagers v_prs,
blos_v_locaties_kp v_kp
WHERE v_prs.alg_locatie_key =
v_kp.alg_locatie_key
AND v_prs.prs_perslid_key = pk.prs_perslid_key
AND v_kp.prs_kostenplaats_key =
pk.prs_kostenplaats_key
GROUP BY v_prs.prs_perslid_key,
v_kp.prs_kostenplaats_key)
AND pk.prs_perslid_key IN ( SELECT prs_perslid_key
FROM blos_v_locatiemanagers
GROUP BY prs_perslid_key)
ORDER BY 1, 2;
v_errormsg VARCHAR2 (1000);
v_errorhint VARCHAR2 (1000);
oracle_err_mes VARCHAR2 (200);
oracle_err_num NUMBER;
currentversion fac_module.fac_module_version%TYPE;
v_aanduiding VARCHAR2 (1000);
v_count NUMBER;
v_alg_ruimte_key NUMBER;
v_prs_perslidkostenplaats_key NUMBER (10);
BEGIN
v_count := 0;
FOR rec IN c_loc_wp
LOOP
BEGIN
-- Werkplekkoppelingen op basis van de locaties waar men locatieleider van is
v_aanduiding :=
'bijwerken werkplekkoppelingen locatiemanager - perslid_key:'
|| TO_CHAR (rec.prs_perslid_key);
IF rec.actie = 'toevoegen'
THEN
v_errorhint :=
'actie toevoegen werkplek - loc-key: '
|| TO_CHAR (rec.alg_locatie_key);
BEGIN
SELECT MIN (r.alg_ruimte_key)
INTO v_alg_ruimte_key
FROM alg_ruimte r, alg_verdieping v, alg_gebouw g
WHERE r.alg_verdieping_key = v.alg_verdieping_key
AND v.alg_gebouw_key = g.alg_gebouw_key
AND r.alg_ruimte_verwijder IS NULL
AND v.alg_verdieping_verwijder IS NULL
AND g.alg_gebouw_verwijder IS NULL
AND g.alg_locatie_key = rec.alg_locatie_key;
IF v_alg_ruimte_key IS NOT NULL
THEN
-- PROCEDURE movetoruimte (p_prs_key IN NUMBER, p_ruimte_key IN NUMBER, p_alg_type IN VARCHAR2, p_virtual IN NUMBER DEFAULT 0);
BEGIN
PRS.movetoruimte (rec.prs_perslid_key,
v_alg_ruimte_key,
'L',
1);
END;
END IF;
END;
END IF;
IF rec.actie = 'verwijderen'
THEN
v_errorhint :=
'actie verwijderen werkplek - loc-key: '
|| TO_CHAR (rec.alg_locatie_key);
DELETE prs_werkplek
WHERE prs_werkplek_key = rec.prs_werkplek_key;
END IF;
EXCEPTION
WHEN OTHERS
THEN
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 100);
v_errormsg :=
'OTHERS (error '
|| oracle_err_num
|| '/'
|| oracle_err_mes
|| ')';
fac.writelog (p_applname,
'E',
v_aanduiding || ' - ' || v_errormsg,
v_errorhint);
END;
END LOOP;
FOR rec IN c_loc_kp
LOOP
BEGIN
-- kostenplaatsen en mandaat
v_aanduiding :=
'bijwerken mandaten locatiemanager - perslid_key:'
|| TO_CHAR (rec.prs_perslid_key);
-- Alle mandaten goed inregelen
SELECT prs_perslidkostenplaats_key
INTO v_prs_perslidkostenplaats_key
FROM prs_perslidkostenplaats
WHERE prs_perslid_key = rec.prs_perslid_key
AND prs_kostenplaats_key = rec.prs_kostenplaats_key;
EXCEPTION
WHEN NO_DATA_FOUND
THEN
v_prs_perslidkostenplaats_key := NULL;
IF v_prs_perslidkostenplaats_key IS NULL
THEN
v_errorhint :=
'bijwerken kostenplaats-mandaat - kostenplaat_key'
|| TO_CHAR (rec.prs_kostenplaats_key);
INSERT INTO prs_perslidkostenplaats (
prs_perslidkostenplaats_boeken,
prs_perslidkostenplaats_inzage,
prs_perslid_key,
prs_kostenplaats_key)
VALUES (1,
1,
rec.prs_perslid_key,
rec.prs_kostenplaats_key);
END IF;
END;
END LOOP;
FOR rec IN c_loc_kp_del
LOOP
BEGIN
-- opschonen mandaten die niet meer geldig zijn
v_aanduiding :=
'verwijderen mandaten locatiemanager - perslid_key:'
|| TO_CHAR (rec.prs_perslid_key);
v_errorhint := 'verwijderen mandaten die niet meer geldig zijn';
DELETE FROM prs_perslidkostenplaats
WHERE prs_perslidkostenplaats_key =
rec.prs_perslidkostenplaats_key;
END;
END LOOP;
EXCEPTION
WHEN OTHERS
THEN
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 100);
v_errormsg :=
'OTHERS (error ' || oracle_err_num || '/' || oracle_err_mes;
fac.writelog (p_applname,
'E',
v_errormsg,
v_errorhint);
END;
/
------------------------------------------------------------
----- 1. Personenkaart vinlkboxen Cluster/Label - OUD ---
------------------------------------------------------------
-- Hulpview: Alle locaties die bij een bepaald CLUSTER horen
CREATE OR REPLACE VIEW blos_v_cluster_locaties
@@ -1371,11 +1725,91 @@ END blos_mld_after_insert;
--- Rapportage Views ---
---------------------------------------------------------------------------------------------------------------
-- BASIS - Alle gegevens van BLOS tav indeling Regio's, Cluster/Disticten met de leidinggevende en kostenplaatsen
CREATE OR REPLACE VIEW BLOS_V_ALG_ONROERENDGOED_BASIS
(
REGIO_NAAM,
REGIO_DIRECTEUR,
CLUSTER_NAAM,
REGIO_MANAGER,
LOCATIE,
LOCATIE_CODE,
LOCATIE_KEY,
GEBOUW,
-- gegevens uit locatiekaart
CLUSTERLABEL_OORSPRONKELIJK,
TYPE_OPVANG,
BIJZONDERHEDEN,
KOSTENPLAATS,
KOSTENPLAATS_1,
KOSTENPLAATS_2,
KOSTENPLAATS_3,
LOCATIEMANAGER,
LOCATIEMANAGER_VERVANGER,
LOCATIE_VERVALDATUM,
LOCATIE_OUD
)
AS
SELECT r.alg_regio_omschrijving,
kmd.regiodirecteur,
d.alg_district_omschrijving,
kmd.regiomanager,
l.alg_locatie_omschrijving,
l.alg_locatie_code,
l.alg_locatie_key,
g.alg_gebouw_code || ' - ' || g.alg_gebouw_naam
gebouw,
km.cluster_label_oorspr,
km.type_opvang,
km.bijzonderheden,
km.kostenplaats,
km.kostenplaats_1,
km.kostenplaats_2,
km.kostenplaats_3,
km.locatiemanager,
km.vervanger,
l.alg_locatie_vervaldatum,
CASE WHEN l.alg_locatie_vervaldatum IS NULL OR TRUNC(l.alg_locatie_vervaldatum) > TRUNC(SYSDATE)
THEN 'actueel'
ELSE 'oud'
END
locatie_oud
FROM alg_gebouw g,
alg_locatie l,
alg_district d,
alg_regio r,
(SELECT l.alg_locatie_key,
flx.getdomeinwaarde(1, flx.getflex('ALG',1000, l.alg_locatie_key,'L')) cluster_label_oorspr,
flx.getdomeinwaarde(2, flx.getflex('ALG',1002, l.alg_locatie_key,'L')) type_opvang,
flx.getflex('ALG',1020, l.alg_locatie_key,'L') bijzonderheden,
flx.getflex('ALG',1001, l.alg_locatie_key,'L') kostenplaats,
flx.getdomeinwaarde(161,flx.getflex('ALG',1140, l.alg_locatie_key,'L')) kostenplaats_1,
flx.getdomeinwaarde(161,flx.getflex('ALG',1141, l.alg_locatie_key,'L')) kostenplaats_2,
flx.getdomeinwaarde(161,flx.getflex('ALG',1142, l.alg_locatie_key,'L')) kostenplaats_3,
-- locatieverantwoordelijke
flx.getdomeinwaarde(181,flx.getflex('ALG', 1162, l.alg_locatie_key, 'L')) locatiemanager,
flx.getdomeinwaarde(182,flx.getflex('ALG', 1163, l.alg_locatie_key, 'L')) vervanger
FROM alg_locatie l ) km,
(SELECT d.alg_district_key,
-- regiomanager en regio-directeur
flx.getdomeinwaarde(183,flx.getflex('ALG', 1164, d.alg_district_key, 'D')) regiomanager,
flx.getdomeinwaarde(201,flx.getflex('ALG', 1181, d.alg_district_key, 'D')) regiodirecteur
FROM alg_district d ) kmd
WHERE g.alg_locatie_key = l.alg_locatie_key
AND l.alg_district_key = d.alg_district_key
AND d.alg_regio_key = r.alg_regio_key
AND d.alg_district_key = kmd.alg_district_key (+)
AND l.alg_locatie_key = km.alg_locatie_key (+)
ORDER BY r.alg_regio_omschrijving, d.alg_district_omschrijving, l.alg_locatie_code;
-- Rapportage Gebouwbeheer
-- Rapportage Gebouwbeheer inclusief ruimte - TZT TOEPASSING ALS OOK GRAPHICS GOED DRAAIT
CREATE OR REPLACE VIEW BLOS_V_ALG_ONROERENDGOED
(
REGIO_NAAM,
REGIO_DIRECTEUR,
CLUSTER_NAAM,
REGIO_MANAGER,
LOCATIE,
LOCATIE_CODE,
LOCATIE_KEY,
@@ -1402,7 +1836,10 @@ CREATE OR REPLACE VIEW BLOS_V_ALG_ONROERENDGOED
LOCATIE_OUD
)
AS
SELECT d.alg_district_omschrijving,
SELECT r.alg_regio_omschrijving,
kmd.regiodirecteur,
d.alg_district_omschrijving,
kmd.regiomanager,
l.alg_locatie_omschrijving,
l.alg_locatie_code,
l.alg_locatie_key,
@@ -1433,6 +1870,7 @@ AS
FROM alg_v_onroerendgoed_gegevens v,
alg_locatie l,
alg_district d,
alg_regio r,
(SELECT l.alg_locatie_key,
flx.getdomeinwaarde(1, flx.getflex('ALG',1000, l.alg_locatie_key,'L')) cluster_label_oorspr,
flx.getdomeinwaarde(2, flx.getflex('ALG',1002, l.alg_locatie_key,'L')) type_opvang,
@@ -1445,12 +1883,19 @@ AS
flx.getdomeinwaarde(181,flx.getflex('ALG', 1162, l.alg_locatie_key, 'L')) locatiemanager,
flx.getdomeinwaarde(182,flx.getflex('ALG', 1163, l.alg_locatie_key, 'L')) vervanger
FROM alg_locatie l ) km,
(SELECT d.alg_district_key,
-- regiomanager en regio-directeur
flx.getdomeinwaarde(183,flx.getflex('ALG', 1164, d.alg_district_key, 'D')) regiomanager,
flx.getdomeinwaarde(201,flx.getflex('ALG', 1181, d.alg_district_key, 'D')) regiodirecteur
FROM alg_district d ) kmd,
alg_ruimte r,
alg_srtruimte sr
WHERE v.alg_locatie_key = l.alg_locatie_key
AND l.alg_district_key = d.alg_district_key
AND d.alg_regio_key = r.alg_regio_key
AND d.alg_district_key = kmd.alg_district_key (+)
AND v.alg_type IN ('R')
AND v.alg_locatie_key = km.alg_locatie_key
AND v.alg_locatie_key = km.alg_locatie_key (+)
AND v.alg_ruimte_key = r.alg_ruimte_key AND r.alg_ruimte_verwijder IS NULL
AND r.alg_srtruimte_key = sr.alg_srtruimte_key (+)
ORDER BY d.alg_district_omschrijving, l.alg_locatie_code, v.alg_gebouw_code, v.alg_ruimte_nr
@@ -1833,7 +2278,15 @@ CREATE OR REPLACE PROCEDURE blos_select_daily_task (p_applname IN VARCHAR2, p_ap
AS
BEGIN
-- job om de werkplekkoppelingen te realiseren en onderhouden voor de locatiemanagers
blos_select_wpcluster ('WP_CLUSTER', SYSDATE);
-- IN 2023-SEPT MOET DEZE UIT
blos_select_wpcluster ('WP_CLUSTER', SYSDATE);
-- IN 2023-SEPT MOETEN DEZE AAN
-- blos_select_wp_loc_manager ('WP_LOC_MANAGER', SYSDATE);
-- blos_select_wp_reg_manager ('WP_REG_MANAGER', SYSDATE);
END;
/