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:
@@ -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
|
||||||
|
|||||||
Reference in New Issue
Block a user