ALLR#89320 -- Foutmelding Workday koppeling - uitbreiding koppeling met leidinggevende

svn path=/Customer/trunk/; revision=69663
This commit is contained in:
Jos Migo
2025-07-03 15:03:32 +00:00
parent 417c713843
commit 9af9dd7136

View File

@@ -504,18 +504,25 @@ BEGIN
-- We kunnen alleen maar kenmerken toevoegen/aanpassen als de persoon ook is aangemaakt zonder foutmelding.
IF rec.prs_perslid_key IS NOT NULL
THEN
v_errorhint := 'Bijwerken kenmerk leidinggevende ';
v_errorhint := 'Bijwerken leidinggevende in personenkaart';
v_aanduiding := rec.prs_perslid_voornaam || ' ' || rec.prs_perslid_naam;
IF rec.prs_kenmerk8 IS NOT NULL
THEN
BEGIN
-- op zoek naar de leidinggevende
SELECT prs_perslid_key
-- op zoek naar de leidinggevende binnen bedrijf Alliander
SELECT p.prs_perslid_key
INTO v_prs_perslid_key
FROM prs_perslid
WHERE prs_perslid_nr = rec.prs_kenmerk8;
FROM prs_perslid p, prs_v_afdeling v
WHERE p.prs_afdeling_key = v.prs_afdeling_key
AND v.prs_afdeling_verwijder IS NULL
AND v.prs_bedrijf_key = c_prs_bedrijf_key
AND p.prs_perslid_nr = rec.prs_kenmerk8
AND p.prs_perslid_verwijder IS NULL ;
UPDATE prs_perslid
SET prs_perslid_key_verantw = v_prs_perslid_key
WHERE prs_perslid_key = rec.prs_perslid_key ;
FLX.setflex('PRS', 1021, rec.prs_perslid_key, 'P', v_prs_perslid_key);
EXCEPTION WHEN NO_DATA_FOUND
THEN
fac.imp_writelog (p_import_key,
@@ -532,6 +539,9 @@ BEGIN
-- Type medewerker
v_errorhint := 'Bijwerken kenmerk type medewerker';
FLX.setflex('PRS', 1020, rec.prs_perslid_key, 'P', rec.prs_kenmerk11);
-- Leidinggevendenr. uit workday
v_errorhint := 'Bijwerken kenmerk leidinggevende';
FLX.setflex('PRS', 1080, rec.prs_perslid_key, 'P', COALESCE(rec.prs_kenmerk8, 'onbekend in workday'));
-- Is manager
v_errorhint := 'Bijwerken kenmerk is manager';
IF rec.prs_kenmerk12 = 1