svn path=/Customer/trunk/; revision=13661

This commit is contained in:
Arthur Egberink
2008-09-16 13:47:14 +00:00
parent e8bec1f6f2
commit 94425d3e9a

View File

@@ -1,7 +1,7 @@
-- Script containing customer specific configuration sql statements for CWTD
-- (c) 2008 Facilitor
-- $Revision: 2 $
-- $Modtime: 1-04-08 16:38 $
-- $Revision: 3 $
-- $Modtime: 16-09-08 12:46 $
--
-- Support: +31 53 4800700
@@ -136,11 +136,22 @@ BEGIN
fac.imp_getfield (v_newline, v_fielddelimitor, v_perslid_naamcompl);
-- Skip until the header is found
header_found := TRUE; -- Geen Header check
IF ( 1=2
IF ( v_perslid_nr = 'Personeelsnummer' AND
v_perslid_naam = 'Geboortenaam' AND
v_perslid_geslacht = 'geslacht' AND
v_perslid_partn_tussen = 'voorvoegsel echtg./partner' AND
v_perslid_partn_naam = 'naam echtg./partner' AND
v_perslid_voornaam = 'roepnaam' AND
v_perslid_tussenvoegsel = 'voorvoegsel' AND
v_perslid_voorletters = 'voorletters' AND
v_perslid_telefoonnr = 'Telefoon intern' AND
v_perslid_mobiel = 'GSM nummer zaak' AND
v_perslid_email = 'E-mailadres werk' AND
v_srtperslid_omschrijving = 'Functienaam volledig' AND
v_afdeling_naam = 'Locatie' AND
v_locatie_omschrijving = 'Standplaats'
)
THEN
header_found := TRUE;
ELSIF (header_found)
THEN
@@ -223,6 +234,10 @@ BEGIN
COMMIT;
END;
END LOOP;
IF header_found = FALSE THEN
fac.imp_writelog (p_applname, p_applrun, 'E', 'Geen geldige header gevonden', '');
END IF;
END IF;
EXCEPTION
@@ -355,6 +370,21 @@ BEGIN
-- Delete
v_errorhint := 'Eventueel te verwijderen personen worden verwijderd ';
SELECT COUNT (*)
INTO v_perslid_count_fclt
FROM prs_perslid
WHERE prs_perslid_nr IS NOT NULL AND prs_perslid_verwijder IS NULL;
SELECT COUNT (*)
INTO v_perslid_count_imp
FROM cwtd_imp_persoon;
IF v_perslid_count_imp < 10 THEN
fac.imp_writelog (p_applname, p_applrun, 'E', 'Geen records gevonden om te importeren.', '');
commit;
return;
END IF;
FOR rec_prs_del IN c_prs_del
LOOP
@@ -703,7 +733,6 @@ BEGIN
prs_srtperslid_key = v_srtperslid_key,
prs_afdeling_key = v_afdeling_key,
prs_perslid_verwijder = NULL,
prs_perslid_oslogin = rec_prs_upd.prs_perslid_oslogin,
prs_perslid_email = rec_prs_upd.prs_perslid_email
WHERE prs_perslid_nr = rec_prs_upd.prs_perslid_nr
AND prs_perslid_key = rec_prs_upd.prs_perslid_key
@@ -715,7 +744,6 @@ BEGIN
OR prs_perslid_titel <> rec_prs_upd.prs_perslid_titel
OR prs_srtperslid_key <> v_srtperslid_key
OR prs_afdeling_key <> v_afdeling_key
OR prs_perslid_oslogin <> rec_prs_upd.prs_perslid_oslogin
OR prs_perslid_email <> rec_prs_upd.prs_perslid_email
OR rec_prs_upd.prs_perslid_verwijder IS NOT NULL
);