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

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

Browse Source 
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
1 changed files with 22 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
STER/STER.sql
View File

@@ -122,6 +122,7 @@ IS
v_budgethouder_key NUMBER;
v_count NUMBER;
v_primary_kostcode VARCHAR2(12);
v_youforce_excl VARCHAR2(1);
BEGIN
@@ -131,15 +132,22 @@ BEGIN
v_count:=0;
FOR rec IN c
LOOP
v_youforce_excl:='0';
IF UPPER(rec.prs_perslid_nr) <> 'PERSOONSNUMMER' AND
UPPER(rec.prs_kostenplaats_code) <> 'KOSTENPLAATS'
THEN
v_file_index:=rec.file_index;
v_aanduiding := 'Persoon kan niet gevonden worden op basis van personeels nr'|| rec.prs_perslid_nr;
BEGIN
SELECT p.prs_perslid_key
INTO v_perslid_key
SELECT p.prs_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
WHERE p.PRS_perslid_NR=rec.prs_perslid_nr
AND p.prs_perslid_verwijder IS NULL;
@@ -153,8 +161,15 @@ BEGIN
IF v_perslid_key=-1 THEN
BEGIN
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
INTO v_perslid_key
SELECT p.prs_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
WHERE UPPER(p.prs_perslid_email)=UPPER(rec.prs_perslid_email)
AND p.prs_perslid_verwijder IS NULL;
@@ -274,8 +289,8 @@ BEGIN
END;
-- ALs ik v_perslid_key heb en een v_afdeling_key update prs_perslid met de afdeling_key,
IF v_perslid_key>0 AND v_afdeling_key>0
-- 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 AND v_youforce_excl='0'
THEN
v_count:=v_count+1;
UPDATE prs_perslid