RWSN#54446 Uitrol NVWA/DERDEN-import
svn path=/Customer/trunk/; revision=39329
This commit is contained in:
@@ -2398,13 +2398,13 @@ AS
|
||||
BEGIN
|
||||
-- Check configuratie tbv. Derden incl. beveiliging dat deze Derden géén
|
||||
-- RWS-ers of KNMI-ers zijn!
|
||||
SELECT COUNT (DISTINCT ab.prs_bedrijf_key), MIN (v_bedrijf_key)
|
||||
SELECT COUNT (DISTINCT ab.prs_bedrijf_key), MIN (ab.prs_bedrijf_key)
|
||||
INTO v_bedrijf_count, v_bedrijf_key
|
||||
FROM fac_imp_perslid i,
|
||||
prs_afdeling a,
|
||||
prs_v_afdeling_boom ab,
|
||||
prs_v_aanwezigbedrijf b,
|
||||
fac_v_aanwezigusrdata ud, -- Mapping Derden-bedrijf->rol!
|
||||
fac_v_aanwezigusrdata ud,
|
||||
fac_groep g
|
||||
WHERE i.prs_perslid_nr IS NOT NULL
|
||||
AND i.prs_afdeling_naam = a.prs_afdeling_naam
|
||||
@@ -2412,9 +2412,9 @@ BEGIN
|
||||
AND a.prs_afdeling_key = ab.prs_afdeling_key
|
||||
AND ab.prs_bedrijf_key = b.prs_bedrijf_key
|
||||
AND b.prs_bedrijf_intern = 1 -- Intern bedrijf
|
||||
AND b.prs_bedrijf_aanmaak > TO_DATE ('01102018', 'ddmmyyyy')
|
||||
AND b.prs_bedrijf_key NOT IN (2, 3) -- Geen RWS/KNMI
|
||||
AND TO_CHAR (b.prs_bedrijf_key) = ud.fac_usrdata_code
|
||||
AND ud.fac_usrtab_key = 6 -- Mapping Derden-bedrijf->rol!
|
||||
AND ud.fac_usrtab_key = 6 -- DerdenBedr2Rol
|
||||
AND ud.fac_usrdata_omschr = TO_CHAR (g.fac_groep_key)
|
||||
AND g.fac_groep_aanmaak > TO_DATE ('01102018', 'ddmmyyyy');
|
||||
|
||||
@@ -2432,17 +2432,23 @@ BEGIN
|
||||
AND p.prs_afdeling_key = ab.prs_afdeling_key
|
||||
AND ab.prs_bedrijf_key = v_bedrijf_key;
|
||||
|
||||
IF (v_bedrijf_count != 1)
|
||||
IF (v_bedrijf_count = 0)
|
||||
THEN
|
||||
fac.imp_writelog (
|
||||
p_import_key, 'E',
|
||||
'Personen niet onder (hetzelfde) Derden-bedrijf; zie specificatie!',
|
||||
'Derden-bedrijf niet (correct) geconfigureerd (in Eigen tabel met key=6)!',
|
||||
'Importproces personen afgebroken!');
|
||||
ELSIF (v_bedrijf_count > 1)
|
||||
THEN
|
||||
fac.imp_writelog (
|
||||
p_import_key, 'E',
|
||||
'Afdelingen/personen vallen niet allemaal onder hetzelfde Derden-bedrijf!',
|
||||
'Importproces personen afgebroken!');
|
||||
ELSIF (TRUNC ( (v_count_prs_import / v_count_prs_actual) * 100) < (100 - c_max_delta_percentage))
|
||||
THEN
|
||||
fac.imp_writelog (
|
||||
p_import_key, 'E',
|
||||
'Verschil tussen huidig aantal en te importeren aantal personen te groot; zie specificatie!',
|
||||
'Verschil tussen huidig aantal en te importeren aantal personen te groot!',
|
||||
'- max. verschilpercentage = [' || TO_CHAR (c_max_delta_percentage) || '%]'
|
||||
|| CHR (13) || CHR (10)
|
||||
|| '- #personen/import = [' || TO_CHAR (v_count_prs_import) || ']'
|
||||
|
||||
Reference in New Issue
Block a user