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

VEST#41990 -- PRS import op basis van oslogin

Browse Source 
svn path=/Customer/trunk/; revision=36674
This commit is contained in:
Robin Stoker
2018-01-23 09:48:15 +00:00
parent d4ed6767d4
commit f5437b7021
1 changed files with 30 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

43
VEST/vest.sql
View File

@@ -33,13 +33,30 @@ BEGIN
v_errorhint := 'Generieke update'; v_errorhint := 'Generieke update';
-- de sequence array staat beschreven in PRS_PAC.SRC bij de prs.import_perslid proc -- de sequence array staat beschreven in PRS_PAC.SRC bij de prs.import_perslid proc
prs.import_perslid (p_import_key, prs.import_perslid (p_import_key,
'12;13;14;15;0;0;5;1;3;2;' || '13;14;15;16;0;0;6;1;3;2;' ||
'0;0;0;0;8;9;10;4;0;11;' || '0;0;0;0;9;10;11;5;0;12;' ||
'6;7;4;0;0;0;0;0;0;0;'|| '7;4;0;8;0;0;0;0;0;0;'||
'0;0;0;0;0;0;0;0;0;0;'|| '0;0;0;0;0;0;0;0;0;0;'||
'0;0;0;0;0;0', '0;0;0;0;0;0',
'Achternaam;Voornaam;Tussenvoegsel;Email;Afdeling;Functie;Titel/Aanhef;Geslacht;Telefoonnummer;Mobiel nummer;Personeelsnummer;Locatie;Gebouw;Verdieping;Ruimte' 'Achternaam;Voornaam;Tussenvoegsel;SamAccountName;Email;Afdeling;Functie;Titel/Aanhef;Geslacht;Telefoonnummer;Mobiel nummer;Personeelsnummer;Locatie;Gebouw;Verdieping;Ruimte'
); );
UPDATE fac_imp_perslid
SET alg_locatie_code = (
SELECT a.alg_locatie_code
FROM alg_locatie a
WHERE fac_imp_perslid.alg_locatie_code = a.alg_locatie_omschrijving);
UPDATE fac_imp_perslid
SET prs_afdeling_naam = (
SELECT p.prs_afdeling_naam
FROM prs_afdeling p
WHERE fac_imp_perslid.prs_afdeling_naam = substr (p.prs_afdeling_omschrijving, 1, 15))
WHERE fac_imp_perslid.prs_afdeling_naam NOT IN (SELECT p.prs_afdeling_naam FROM prs_afdeling p);
DELETE FROM fac_imp_perslid
WHERE alg_locatie_code NOT IN (SELECT alg_locatie_code FROM alg_locatie);
COMMIT; COMMIT;
EXCEPTION EXCEPTION
WHEN OTHERS WHEN OTHERS
@@ -57,13 +74,14 @@ CREATE OR REPLACE PROCEDURE vest_update_perslid (
-- Alle personen verwijderen die niet meer in import bestand voorkomen. -- Alle personen verwijderen die niet meer in import bestand voorkomen.
CURSOR c_del CURSOR c_del
IS IS
SELECT p.prs_perslid_key, p.prs_perslid_nr, pf.prs_perslid_naam_full SELECT p.prs_perslid_key, p.prs_perslid_oslogin, pf.prs_perslid_naam_full
FROM fac_imp_perslid i, prs_perslid p, prs_v_perslid_fullnames_all pf FROM fac_imp_perslid i, prs_perslid p, prs_v_perslid_fullnames_all pf
WHERE p.prs_perslid_nr = i.prs_perslid_nr(+) WHERE p.prs_perslid_oslogin = i.prs_perslid_oslogin(+)
AND pf.prs_perslid_key = p.prs_perslid_key AND pf.prs_perslid_key = p.prs_perslid_key
AND p.prs_perslid_nr IS NOT NULL AND p.prs_perslid_oslogin IS NOT NULL
AND i.prs_perslid_nr IS NULL AND i.prs_perslid_oslogin IS NULL
AND p.prs_perslid_verwijder IS NULL AND p.prs_perslid_verwijder IS NULL
AND p.prs_perslid_oslogin NOT LIKE '%_%'
ORDER BY 2; ORDER BY 2;
v_count NUMBER; v_count NUMBER;
@@ -75,7 +93,7 @@ BEGIN
INTO v_count INTO v_count
FROM fac_imp_perslid; FROM fac_imp_perslid;
IF v_count < 300 IF v_count < 150
THEN THEN
fac.imp_writelog (p_import_key, fac.imp_writelog (p_import_key,
'E', 'E',
@@ -86,9 +104,9 @@ BEGIN
RETURN; RETURN;
END IF; END IF;
-- 'NR' betekent dat op basis van personeelsNummeR wordt gematched. -- 'LOGIN' betekent dat op basis van oslogin wordt gematched.
-- 'A' betekent altijd alle (andere/overige) werkplekken verwijderen -- 'A' betekent altijd alle (andere/overige) werkplekken verwijderen
prs.update_perslid (p_import_key, 'NR', NULL); prs.update_perslid (p_import_key, 'LOGIN', NULL);
-- Verwijder personen die niet meer in de import voorkomen. -- Verwijder personen die niet meer in de import voorkomen.
FOR rec IN c_del FOR rec IN c_del
@@ -97,7 +115,6 @@ BEGIN
prs.delete_perslid (p_import_key, rec.prs_perslid_key); prs.delete_perslid (p_import_key, rec.prs_perslid_key);
END; END;
END LOOP; END LOOP;
vest_post_update_perslid (p_import_key);
END vest_update_perslid; END vest_update_perslid;
/ /