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

VOLK#78884 Koppeling voor up to date houden afdelingen

Browse Source 
svn path=/Customer/trunk/; revision=62775
This commit is contained in:
Suzan Wiegerinck
2023-11-30 09:41:32 +00:00
parent e4f7614b67
commit e62432e077
1 changed files with 10 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

33
VOLK/volk.sql
View File

@@ -1776,7 +1776,7 @@ AS
BEGIN
-- Eerst opruiming
DELETE FROM fac_imp_organisatie;
COMMIT;
v_count_error := 0;
header_is_valid := 0;
@@ -1795,13 +1795,9 @@ BEGIN
-- Lees alle veldwaarden
fac.imp_getfield (v_newline, c_fielddelimitor, v_bedrijf_naam);
fac.imp_getfield (v_newline,
c_fielddelimitor,
v_afdeling_naam_parent);
fac.imp_getfield (v_newline, c_fielddelimitor, v_afdeling_naam_parent);
fac.imp_getfield (v_newline, c_fielddelimitor, v_afdeling_naam);
fac.imp_getfield (v_newline,
c_fielddelimitor,
v_afdeling_omschrijving);
fac.imp_getfield (v_newline, c_fielddelimitor, v_afdeling_omschrijving);
v_aanduiding :=
v_bedrijf_naam
@@ -1851,13 +1847,6 @@ BEGIN
|| ']');
END IF;
-- als de afdeling minder dan 6 karakters bevat, moeten we deze aanvullen met voorloopnullen
IF LENGTH (v_afdeling_naam) < 6
THEN
v_afdeling_naam := LPAD (v_afdeling_naam, 6, '0');
END IF;
--
v_afdeling_naam_parent := TRIM (v_afdeling_naam_parent);
IF LENGTH (v_afdeling_naam_parent) > 15
@@ -1873,14 +1862,6 @@ BEGIN
|| ']');
END IF;
-- als de afdelingparent minder dan 6 karakters bevat, moeten we deze aanvullen met voorloopnullen
IF LENGTH (v_afdeling_naam_parent) < 6
THEN
v_afdeling_naam_parent :=
LPAD (v_afdeling_naam_parent, 6, '0');
END IF;
--
v_afdeling_omschrijving := TRIM (v_afdeling_omschrijving);
IF LENGTH (v_afdeling_omschrijving) > 60
@@ -1922,6 +1903,11 @@ BEGIN
v_afdeling_omschrijving,
'999999'); -- dummy kostenplaats
--- behalve natuurlijk bij 000036 zelf
UPDATE fac_imp_organisatie i
SET i.prs_afdeling_naam_parent = NULL
WHERE i.prs_afdeling_naam = '000036';
v_count_import := v_count_import + 1;
END IF;
END IF;
@@ -1970,7 +1956,8 @@ AS
SELECT a.prs_afdeling_key,
a.prs_afdeling_naam || ' ' || a.prs_afdeling_omschrijving afdeling
FROM prs_afdeling a
WHERE NOT EXISTS
WHERE a.prs_afdeling_verwijder IS NULL
AND NOT EXISTS
(SELECT i.prs_afdeling_naam
FROM fac_imp_organisatie i
WHERE i.prs_afdeling_naam = a.prs_afdeling_naam)