STER#83920 -- Sterk huis implementatie, youforce import aanpassing. Logica om bepaalde mensen uit te sluiten van de update

svn path=/Customer/trunk/; revision=68129
This commit is contained in:
Norbert Wassink
2025-02-21 09:20:57 +00:00
parent 377e081ad7
commit 22fca1b8c0

View File

@@ -122,6 +122,7 @@ IS
v_budgethouder_key NUMBER; v_budgethouder_key NUMBER;
v_count NUMBER; v_count NUMBER;
v_primary_kostcode VARCHAR2(12); v_primary_kostcode VARCHAR2(12);
v_youforce_excl VARCHAR2(1);
BEGIN BEGIN
@@ -131,15 +132,22 @@ BEGIN
v_count:=0; v_count:=0;
FOR rec IN c FOR rec IN c
LOOP LOOP
v_youforce_excl:='0';
IF UPPER(rec.prs_perslid_nr) <> 'PERSOONSNUMMER' AND IF UPPER(rec.prs_perslid_nr) <> 'PERSOONSNUMMER' AND
UPPER(rec.prs_kostenplaats_code) <> 'KOSTENPLAATS' UPPER(rec.prs_kostenplaats_code) <> 'KOSTENPLAATS'
THEN THEN
v_file_index:=rec.file_index; v_file_index:=rec.file_index;
v_aanduiding := 'Persoon kan niet gevonden worden op basis van personeels nr'|| rec.prs_perslid_nr; v_aanduiding := 'Persoon kan niet gevonden worden op basis van personeels nr'|| rec.prs_perslid_nr;
BEGIN BEGIN
SELECT p.prs_perslid_key SELECT p.prs_perslid_key,
INTO v_perslid_key COALESCE((SELECT pkl.prs_kenmerklink_waarde from prs_kenmerklink pkl, prs_kenmerk pk
WHERE pk.prs_kenmerk_code='YOUFORCE_EXCLUDE'
AND pkl.prs_kenmerk_key=pkl.prs_kenmerk_key
AND pkl.prs_link_key=p.prs_perslid_key
AND pk.prs_kenmerk_niveau='P'
AND pk.prs_kenmerk_verwijder IS NULL),'0') youforce_excl
INTO v_perslid_key,
v_youforce_excl
FROM prs_perslid p FROM prs_perslid p
WHERE p.PRS_perslid_NR=rec.prs_perslid_nr WHERE p.PRS_perslid_NR=rec.prs_perslid_nr
AND p.prs_perslid_verwijder IS NULL; AND p.prs_perslid_verwijder IS NULL;
@@ -153,8 +161,15 @@ BEGIN
IF v_perslid_key=-1 THEN IF v_perslid_key=-1 THEN
BEGIN BEGIN
v_aanduiding := 'Persoon kan niet gevonden worden op basis van personeels nr'|| rec.prs_perslid_nr||' of email '||rec.prs_perslid_email; v_aanduiding := 'Persoon kan niet gevonden worden op basis van personeels nr'|| rec.prs_perslid_nr||' of email '||rec.prs_perslid_email;
SELECT p.prs_perslid_key SELECT p.prs_perslid_key,
INTO v_perslid_key COALESCE((SELECT pkl.prs_kenmerklink_waarde from prs_kenmerklink pkl, prs_kenmerk pk
WHERE pk.prs_kenmerk_code='YOUFORCE_EXCLUDE'
AND pkl.prs_kenmerk_key=pkl.prs_kenmerk_key
AND pkl.prs_link_key=p.prs_perslid_key
AND pk.prs_kenmerk_niveau='P'
AND pk.prs_kenmerk_verwijder IS NULL),'0') youforce_excl
INTO v_perslid_key,
v_youforce_excl
FROM prs_perslid p FROM prs_perslid p
WHERE UPPER(p.prs_perslid_email)=UPPER(rec.prs_perslid_email) WHERE UPPER(p.prs_perslid_email)=UPPER(rec.prs_perslid_email)
AND p.prs_perslid_verwijder IS NULL; AND p.prs_perslid_verwijder IS NULL;
@@ -274,8 +289,8 @@ BEGIN
END; END;
-- ALs ik v_perslid_key heb en een v_afdeling_key update prs_perslid met de afdeling_key, -- ALs ik v_perslid_key heb en een v_afdeling_key en youforce_excl =0 update dan prs_perslid met de afdeling_key,
IF v_perslid_key>0 AND v_afdeling_key>0 IF v_perslid_key>0 AND v_afdeling_key>0 AND v_youforce_excl='0'
THEN THEN
v_count:=v_count+1; v_count:=v_count+1;
UPDATE prs_perslid UPDATE prs_perslid