SVRZ#59828 PERSLID-import/CUST04-noti bij uitdienst
svn path=/Customer/trunk/; revision=45236
This commit is contained in:
@@ -198,7 +198,8 @@ IS
|
||||
SELECT p.prs_perslid_key, p.prs_perslid_nr, i.prs_kenmerk1, i.prs_kenmerk2
|
||||
FROM prs_v_aanwezigperslid p, fac_imp_perslid i
|
||||
WHERE p.prs_perslid_nr = i.prs_perslid_nr
|
||||
AND (i.prs_kenmerk1 IS NOT NULL OR i.prs_kenmerk2 IS NOT NULL)
|
||||
AND i.prs_kenmerk2 IS NOT NULL
|
||||
AND fac.safe_to_date (prs_kenmerk2, 'dd-mm-yyyy') > p.prs_perslid_ingangsdatum -- Uitdienstdatum moet v<><76>r indienstdatum liggen!
|
||||
ORDER BY 2;
|
||||
|
||||
-- Let op! Personen die niet meer in dienst zijn -> niet in fac_imp_perslid!
|
||||
@@ -228,15 +229,18 @@ BEGIN
|
||||
prs.update_perslid (p_import_key, 'NR', 'D');
|
||||
|
||||
-- Update flexvelden.
|
||||
-- SVRZ#59828: Registreren in/uitdienstdatum (tbv. bezittingen-noti).
|
||||
v_errorhint := 'Fout bijwerken in/uitdienstdatum';
|
||||
-- SVRZ#59828: Registreren uitdienstdatum (tbv. bezittingen-noti).
|
||||
v_errorhint := 'Fout bijwerken uitdienstdatum';
|
||||
FOR rec IN c_flex
|
||||
LOOP
|
||||
--PRS.upsertkenmerk (-1, rec.prs_perslid_key, TO_CHAR (fac.safe_to_date (rec.prs_kenmerk1, 'dd-mm-yyyy'), 'dd-mm-yyyy')); -- Indienst
|
||||
--PRS.upsertkenmerk (-1, rec.prs_perslid_key, TO_CHAR (fac.safe_to_date (rec.prs_kenmerk2, 'dd-mm-yyyy'), 'dd-mm-yyyy')); -- Uitdienst
|
||||
--UPDATE prs_perslid
|
||||
-- SET prs_perslid_ingangsdatum = COALESCE (fac.safe_to_date (rec.prs_kenmerk1, 'dd-mm-yyyy'), prs_perslid_ingangsdatum),
|
||||
-- prs_perslid_einddatum = COALESCE (fac.safe_to_date (rec.prs_kenmerk2, 'dd-mm-yyyy'), prs_perslid_einddatum)
|
||||
-- WHERE prs_perslid_key = rec.prs_perslid_key;
|
||||
UPDATE prs_perslid
|
||||
SET prs_perslid_ingangsdatum = COALESCE (fac.safe_to_date (rec.prs_kenmerk1, 'dd-mm-yyyy'), prs_perslid_ingangsdatum),
|
||||
prs_perslid_einddatum = COALESCE (fac.safe_to_date (rec.prs_kenmerk2, 'dd-mm-yyyy'), prs_perslid_einddatum)
|
||||
SET prs_perslid_einddatum = COALESCE (fac.safe_to_date (rec.prs_kenmerk2, 'dd-mm-yyyy'), prs_perslid_einddatum)
|
||||
WHERE prs_perslid_key = rec.prs_perslid_key;
|
||||
COMMIT;
|
||||
END LOOP;
|
||||
|
||||
Reference in New Issue
Block a user