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

logi#64430: import personeelsbestand

Browse Source 
svn path=/Customer/trunk/; revision=48610
This commit is contained in:
Suzan Wiegerinck
2020-10-27 15:30:23 +00:00
parent 65bb63024c
commit 3d0242d71e
1 changed files with 10 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
LOGI/logi.sql
View File

@@ -91,6 +91,7 @@ AS
p.prs_perslid_verwijder
FROM fac_imp_perslid lp, prs_perslid p
WHERE 1 = 1 AND lp.prs_perslid_email = p.prs_perslid_email
AND p.prs_perslid_verwijder IS NULL
ORDER BY lp.prs_perslid_nr, p.prs_perslid_key DESC;
v_perslid_key NUMBER (10);
@@ -160,9 +161,9 @@ BEGIN
INTO v_new_locatie_key
FROM fac_usrdata ud, alg_locatie lo
WHERE ud.fac_usrtab_key = c_usrtab_key
AND ud.fac_usrdata_code = lo.alg_locatie_code
AND ud.fac_usrdata_omschr =
rec_prs_upd.prs_locatie_omschrijving
AND upper(ud.fac_usrdata_code) = upper(lo.alg_locatie_code)
AND upper(ud.fac_usrdata_omschr) = upper
(rec_prs_upd.prs_locatie_omschrijving)
AND lo.alg_locatie_verwijder IS NULL;
-- indien gelijk dan werkplek niet updaten.
@@ -186,16 +187,14 @@ BEGIN
THEN
v_errormsg :=
'Fout bij toewijzen werkplek bij zojuist toegevoegde persoon ';
BEGIN
SELECT lo.alg_locatie_key
INTO v_locatie_key
FROM FAC_USRDATA ud, ALG_LOCATIE lo
WHERE ud.fac_usrtab_key = c_usrtab_key
AND ud.fac_usrdata_code = lo.alg_locatie_code
AND ud.fac_usrdata_omschr =
rec_prs_upd.prs_locatie_omschrijving
AND upper(ud.fac_usrdata_code) = upper(lo.alg_locatie_code)
AND upper(ud.fac_usrdata_omschr) =
upper(rec_prs_upd.prs_locatie_omschrijving)
AND lo.alg_locatie_verwijder IS NULL;
EXCEPTION
WHEN OTHERS
@@ -226,7 +225,7 @@ BEGIN
INTO v_gebouw_key
FROM alg_gebouw
WHERE alg_locatie_key = v_locatie_key
AND alg_gebouw_code = v_gebouw_code
AND upper(alg_gebouw_code) = upper(v_gebouw_code)
AND alg_gebouw_verwijder IS NULL;
EXCEPTION
WHEN NO_DATA_FOUND
@@ -251,7 +250,7 @@ BEGIN
INTO v_gebouw_key
FROM alg_gebouw
WHERE alg_locatie_key = v_locatie_key
AND alg_gebouw_code = v_gebouw_code
AND upper(alg_gebouw_code) = upper(v_gebouw_code)
AND alg_gebouw_verwijder IS NULL;
END;
@@ -380,6 +379,7 @@ BEGIN
END;
/
CREATE OR REPLACE PROCEDURE logi_update_persoon (p_import_key IN NUMBER)
AS
oracle_err_num NUMBER;