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

ALLI#33755 PRS-import: tussenvoegselveld niet meer gebruiken

Browse Source 
svn path=/Customer/trunk/; revision=26445
This commit is contained in:
Peter Koerhuis
2015-09-23 09:23:36 +00:00
parent 03ba1f2f8f
commit 32fff6203c
1 changed files with 21 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

40
ALLI/alli.sql
View File

@@ -253,23 +253,25 @@ BEGIN
END IF;
COMMIT;
-- ALLI#33755: tussenvoegsel niet meer inlezen. Dat zit tot nader order in
-- het achternaamveld gebakken
v_prs_perslid_tussenvoegsel := NULL;
--v_errorhint := 'Ongeldig tussenvoegsel';
--v_prs_perslid_tussenvoegsel := TRIM (v_prs_perslid_tussenvoegsel);
--
v_errorhint := 'Ongeldig tussenvoegsel';
v_prs_perslid_tussenvoegsel := TRIM (v_prs_perslid_tussenvoegsel);
IF LENGTH (v_prs_perslid_tussenvoegsel) > 15
THEN
v_prs_perslid_tussenvoegsel :=
SUBSTR (v_prs_perslid_tussenvoegsel, 1, 15);
fac.imp_writelog (p_import_key,
'W',
v_aanduiding || 'Tussenvoegsel te lang',
'Tussenvoegsel wordt afgebroken tot ['
|| v_prs_perslid_tussenvoegsel
|| ']'
);
COMMIT;
END IF;
--IF LENGTH (v_prs_perslid_tussenvoegsel) > 15
--THEN
-- v_prs_perslid_tussenvoegsel :=
-- SUBSTR (v_prs_perslid_tussenvoegsel, 1, 15);
-- fac.imp_writelog (p_import_key,
-- 'W',
-- v_aanduiding || 'Tussenvoegsel te lang',
-- 'Tussenvoegsel wordt afgebroken tot ['
-- || v_prs_perslid_tussenvoegsel
-- || ']'
-- );
-- COMMIT;
--END IF;
--
v_errorhint := 'Ongeldige voorletters';
@@ -1206,13 +1208,13 @@ BEGIN
-- E-mail: alleen bijwerken indien uit AD-dump gevuld, anders niet bijwerken (dus gewoon laten staan zoals in Facilitor was gereigistreerd).
-- Personeelsnr: alleen bijwerken indien uit AD-dump gevuld, anders niet bijwerken (dus gewoon laten staan zoals in Facilitor was gereigistreerd).
-- Login: alleen bijwerken indien uit AD-dump gevuld, anders niet bijwerken (dus gewoon laten staan zoals in Facilitor was gereigistreerd).
-- ALLI#33755: tussenvoegselveld actief leegmaken (dus geen coalesce meer)
UPDATE prs_perslid
SET prs_srtperslid_key = v_srtperslid_key,
prs_afdeling_key = v_afdeling_key,
prs_perslid_naam = COALESCE(recperslid.prs_perslid_naam,prs_perslid_naam),
prs_perslid_voorletters = COALESCE(recperslid.prs_perslid_voorletters,prs_perslid_voorletters),
prs_perslid_tussenvoegsel = COALESCE(recperslid.prs_perslid_tussenvoegsel,prs_perslid_tussenvoegsel),
prs_perslid_tussenvoegsel = recperslid.prs_perslid_tussenvoegsel,
prs_perslid_voornaam = COALESCE(recperslid.prs_perslid_voornaam,prs_perslid_voornaam),
prs_perslid_telefoonnr = COALESCE (recperslid.prs_perslid_telefoonnr, prs_perslid_telefoonnr),
prs_perslid_mobiel = COALESCE (recperslid.prs_perslid_mobiel, prs_perslid_mobiel),
@@ -2827,7 +2829,7 @@ AS
BEGIN adm.systrackscriptId('$Id$', 0); END;
/
BEGIN fac.registercustversion('ALLI', 12); END;
BEGIN fac.registercustversion('ALLI', 13); END;
/
commit;