diff --git a/VBXX/vbxx.sql b/VBXX/vbxx.sql index 4bc13155c..12e51ccb2 100644 --- a/VBXX/vbxx.sql +++ b/VBXX/vbxx.sql @@ -39,9 +39,15 @@ AS FUNCTION bepaal_fin_district (p_fin_key IN NUMBER) RETURN NUMBER; + FUNCTION bepaal_fin_regio (p_fin_key IN NUMBER) + RETURN NUMBER; + FUNCTION bepaal_opdr_district (p_opdr_key IN NUMBER) RETURN NUMBER; + FUNCTION bepaal_opdr_regio (p_opdr_key IN NUMBER) + RETURN NUMBER; + FUNCTION bepaal_fin_gebouw (p_fin_key IN NUMBER) RETURN NUMBER; @@ -344,6 +350,24 @@ AS RETURN v_district_key; END; + -- deze functie bepaald aan de hand van de factuur_key de regio en daarmee de administratie + -- waaronder deze factuur geboekt gaat worden. + FUNCTION bepaal_fin_regio (p_fin_key IN NUMBER) + RETURN NUMBER + AS + v_regio_key NUMBER; + BEGIN + SELECT alg_regio_key + INTO v_regio_key + FROM fin_factuur f, mld_opdr o, mld_melding m, alg_locatie l, alg_district d + WHERE f.fin_factuur_key = p_fin_key + AND f.mld_opdr_key = o.mld_opdr_key + AND o.mld_melding_key = m.mld_melding_key + AND m.mld_alg_locatie_key = l.alg_locatie_key + AND l.alg_district_key = d.alg_regio_key; + RETURN v_regio_key; + END; + -- deze functie bepaald aan de hand van de opdracht het district FUNCTION bepaal_opdr_district (p_opdr_key IN NUMBER) RETURN NUMBER @@ -359,6 +383,22 @@ AS RETURN v_district_key; END; + -- deze functie bepaald aan de hand van de opdracht de regio + FUNCTION bepaal_opdr_regio (p_opdr_key IN NUMBER) + RETURN NUMBER + AS + v_regio_key NUMBER; + BEGIN + SELECT alg_regio_key + INTO v_regio_key + FROM mld_opdr o, mld_melding m, alg_locatie l, alg_district d + WHERE o.mld_opdr_key = p_opdr_key + AND o.mld_melding_key = m.mld_melding_key + AND m.mld_alg_locatie_key = l.alg_locatie_key + AND l.alg_district_key = d.alg_district_key; + RETURN v_regio_key; + END; + -- deze functie bepaald aan de hand van de factuur_key het gebouw. FUNCTION bepaal_fin_gebouw (p_fin_key IN NUMBER) RETURN NUMBER @@ -2127,8 +2167,7 @@ CREATE OR REPLACE VIEW vbxx_v_frozen_fact bro_id, factuur_naar_sg, aantal, - kosten, - bps + kosten ) AS /* @@ -2176,8 +2215,7 @@ AS NULL bro_id, DECODE (kl.prs_kenmerklink_waarde, 1, 'Ja', 'Nee') fact2sg, 0 aantal, - ud.fac_usrdata_prijs kosten, - 'X' bps -- X=Don't care! + ud.fac_usrdata_prijs kosten FROM fac_usrdata ud, cnt_contract c, prs_bedrijf b, @@ -2255,8 +2293,7 @@ AS SUM ((boi.bes_bestelopdr_item_aantal * COALESCE (boi.bes_bestelopdr_item_inkprijs, boi.bes_bestelopdr_item_prijs)) + COALESCE (bo.bes_bestelopdr_korting, 0) + COALESCE (bo.bes_bestelopdr_levkosten, 0)) - kosten, -- Netto bedrag, want alle bedragen excl. BTW, toch? - DECODE (c.cnt_contract_nummer_intern, 30, 'O', 'X') bps -- 30=Maatwerk-contract met Eurest Catering + kosten -- Netto bedrag, want alle bedragen excl. BTW, toch? FROM bes_bestelling b, bes_bestelling_item bbi, bes_bestelopdr_item boi, @@ -2333,8 +2370,7 @@ AS NULL, bo.bes_bestelopdr_id, DECODE (kl.prs_kenmerklink_waarde, 1, 'Ja', 'Nee'), - 1, - DECODE (c.cnt_contract_nummer_intern, 30, 'O', 'X') + 1 UNION ALL -- Variabele kosten uit FROZEN reserveringen op variabele contracten (via fin_verkoopfactuur_id!) SELECT x.prs_afdeling_key, SUBSTR (x.fin_verkoopfactuur_maand, 1, 4) || '-' || SUBSTR (x.fin_verkoopfactuur_maand, 5, 2) maand, @@ -2356,8 +2392,7 @@ AS x.fin_verkoopfactuur_omschr bro_id, DECODE (x.prs_kenmerklink_waarde, 1, 'Ja', 'Nee') fact2sg, 1 aantal, - SUM (COALESCE (x.verw_prijs, x.prijs, 0)) kosten, -- Netto bedrag, want alle bedragen excl. BTW, toch? - DECODE (x.cnt_contract_nummer_intern, 30, 'O', 'X') bps -- 30=Maatwerk-contract met Eurest Catering + SUM (COALESCE (x.verw_prijs, x.prijs, 0)) kosten -- Netto bedrag, want alle bedragen excl. BTW, toch? FROM (SELECT pcp.prs_afdeling_key, vf.fin_verkoopfactuur_maand, b.prs_bedrijf_key, @@ -2457,8 +2492,7 @@ AS NULL, x.fin_verkoopfactuur_omschr, DECODE (x.prs_kenmerklink_waarde, 1, 'Ja', 'Nee'), - 1, - DECODE (x.cnt_contract_nummer_intern, 30, 'O', 'X') + 1 UNION ALL -- Variabele kosten uit FROZEN opdrachten op variabele contracten */ SELECT pcp.prs_afdeling_key, @@ -2506,8 +2540,7 @@ AS TO_CHAR (o.mld_melding_key) || '/' || TO_CHAR (o.mld_opdr_bedrijfopdr_volgnr) bro_id, DECODE (kl.prs_kenmerklink_waarde, 1, 'Ja', 'Nee'), 1 aantal, - o.mld_opdr_kosten kosten, -- Netto bedrag, want alle bedragen excl. BTW, toch? - DECODE (c.cnt_contract_nummer_intern, 30, DECODE (m.mld_alg_onroerendgoed_keys, 8023, 'B', 'O'), 'X') bps -- 30=Maatwerk-contract met Eurest Catering/8023=Restaurant BPS (TERM-T1-3-R3236) + o.mld_opdr_kosten kosten -- Netto bedrag, want alle bedragen excl. BTW, toch? FROM mld_opdr o, cnt_contract c, prs_bedrijf b, @@ -2589,8 +2622,7 @@ AS TO_CHAR (o.mld_melding_key) || '/' || TO_CHAR (o.mld_opdr_bedrijfopdr_volgnr) bro_id, DECODE (kl.prs_kenmerklink_waarde, 1, 'Ja', 'Nee'), 1 aantal, - o.mld_opdr_kosten kosten, -- Netto bedrag, want alle bedragen excl. BTW, toch? - DECODE (c.cnt_contract_nummer_intern, 30, DECODE (m.mld_alg_onroerendgoed_keys, 8023, 'B', 'O'), 'X') bps -- 30=Maatwerk-contract met Eurest Catering/8023=Restaurant BPS (TERM-T1-3-R3236) + o.mld_opdr_kosten kosten -- Netto bedrag, want alle bedragen excl. BTW, toch? FROM mld_opdr o, cnt_contract c, prs_bedrijf b, @@ -2648,8 +2680,7 @@ CREATE OR REPLACE VIEW vbxx_v_rap_frozen_fact_tot beschrijving, inkoopordernr, aantal, - kosten, - bps + kosten ) AS -- Vaste contractkosten over de FROZEN termijnen SELECT prs_afdeling_key, @@ -2662,8 +2693,7 @@ AS -- Vaste contractkosten over de FROZEN termijnen beschrijving, inkoopordernr, SUM (aantal), - SUM (kosten), - bps + SUM (kosten) FROM vbxx_v_frozen_fact GROUP BY prs_afdeling_key, maand, @@ -2673,8 +2703,7 @@ AS -- Vaste contractkosten over de FROZEN termijnen --cnt_contract_key, contractnr, beschrijving, - inkoopordernr, - bps; + inkoopordernr; /* -- KFSG#65747: Rapportage tbv. leverancier-contactpersonen! CREATE OR REPLACE VIEW kfsg_v_rap_frozen_tot_lev @@ -2687,8 +2716,7 @@ CREATE OR REPLACE VIEW kfsg_v_rap_frozen_tot_lev beschrijving, inkoopordernr, aantal, - kosten, - bps + kosten ) AS -- Vaste contractkosten over de FROZEN termijnen SELECT cp.prs_perslid_key, @@ -2699,8 +2727,7 @@ AS -- Vaste contractkosten over de FROZEN termijnen v.beschrijving, v.inkoopordernr, SUM (v.aantal), - SUM (COALESCE (v.kosten, 0)), - v.bps + SUM (COALESCE (v.kosten, 0)) FROM kfsg_v_frozen_fact v, (SELECT * FROM prs_contactpersoon @@ -2713,8 +2740,7 @@ AS -- Vaste contractkosten over de FROZEN termijnen v.prs_bedrijf_naam, v.contractnr, v.beschrijving, - v.inkoopordernr, - v.bps; + v.inkoopordernr; -- Geexporteerde/bevroren variabele bestelopdrachtkosten over voorgaande maanden (details). CREATE OR REPLACE VIEW kfsg_v_rap_frozen_fact_bes @@ -2736,8 +2762,7 @@ CREATE OR REPLACE VIEW kfsg_v_rap_frozen_fact_bes kosten, fclt_f_contractnr, fclt_f_inkoopordernr, - fclt_x_district, - bps + fclt_x_district ) AS SELECT v.prs_afdeling_key, @@ -2757,8 +2782,7 @@ AS v.kosten, v.contractnr, v.inkoopordernr, - d.alg_district_omschrijving, - v.bps + d.alg_district_omschrijving FROM kfsg_v_frozen_fact v, bes_bestelopdr bo, (SELECT DISTINCT boi.bes_bestelopdr_key, b.bes_bestelling_key, b.mld_adres_key_lev, b.bes_bestelling_plaats, b.bes_bestelling_datum, b.bes_bestelling_status, td.ins_discipline_omschrijving @@ -2801,8 +2825,7 @@ CREATE OR REPLACE VIEW kfsg_v_rap_frozen_bes_lev kosten, fclt_f_contractnr, fclt_f_inkoopordernr, - fclt_x_district, - bps + fclt_x_district ) AS SELECT cp.prs_perslid_key, @@ -2822,8 +2845,7 @@ AS COALESCE (v.kosten, 0), v.contractnr, v.inkoopordernr, - d.alg_district_omschrijving, - v.bps + d.alg_district_omschrijving FROM kfsg_v_frozen_fact v, bes_bestelopdr bo, (SELECT DISTINCT boi.bes_bestelopdr_key, b.bes_bestelling_key, b.mld_adres_key_lev, b.bes_bestelling_plaats, b.bes_bestelling_datum, b.bes_bestelling_status, td.ins_discipline_omschrijving @@ -2872,8 +2894,7 @@ CREATE OR REPLACE VIEW kfsg_v_rap_frozen_fact_res kosten, fclt_f_contractnr, fclt_f_inkoopordernr, - fclt_x_district, - bps + fclt_x_district ) AS SELECT v.prs_afdeling_key, @@ -2900,8 +2921,7 @@ AS v.kosten, v.contractnr, v.inkoopordernr, - d.alg_district_omschrijving, - v.bps + d.alg_district_omschrijving FROM kfsg_v_frozen_fact v, res_rsv_ruimte rrr, res_activiteit ra, @@ -2948,8 +2968,7 @@ CREATE OR REPLACE VIEW kfsg_v_rap_frozen_res_lev kosten, fclt_f_contractnr, fclt_f_inkoopordernr, - fclt_x_district, - bps + fclt_x_district ) AS SELECT cp.prs_perslid_key, @@ -2976,8 +2995,7 @@ AS COALESCE (v.kosten, 0), v.contractnr, v.inkoopordernr, - d.alg_district_omschrijving, - v.bps + d.alg_district_omschrijving FROM kfsg_v_frozen_fact v, res_rsv_ruimte rrr, res_activiteit ra, @@ -3033,8 +3051,7 @@ CREATE OR REPLACE VIEW vbxx_v_rap_frozen_fact_mld kosten, fclt_f_contractnr, fclt_f_inkoopordernr, - fclt_x_district, - bps + fclt_x_district ) AS SELECT v.prs_afdeling_key, @@ -3065,8 +3082,7 @@ AS o.mld_opdr_kosten, v.contractnr, v.inkoopordernr, - d.alg_district_omschrijving, - v.bps + d.alg_district_omschrijving FROM vbxx_v_frozen_fact v, mld_opdr o, mld_statusopdr os, @@ -3116,8 +3132,7 @@ CREATE OR REPLACE VIEW kfsg_v_rap_frozen_mld_lev kosten, fclt_f_contractnr, fclt_f_inkoopordernr, - fclt_x_district, - bps + fclt_x_district ) AS SELECT cp.prs_perslid_key, @@ -3148,8 +3163,7 @@ AS COALESCE (o.mld_opdr_kosten, 0), v.contractnr, v.inkoopordernr, - d.alg_district_omschrijving, - v.bps + d.alg_district_omschrijving FROM kfsg_v_frozen_fact v, mld_opdr o, mld_statusopdr os, @@ -3782,6 +3796,9 @@ AS lk.prs_kostenplaats_nr lev_kpn, COALESCE(ml.alg_district_key, cl.alg_district_key) alg_district_key, + (SELECT alg_regio_key + FROM alg_district di + WHERE di.alg_district_key = COALESCE(ml.alg_district_key, cl.alg_district_key) ) alg_regio_key, DECODE ( f.cnt_contract_key, NULL, DECODE ( @@ -3893,6 +3910,7 @@ CREATE OR REPLACE VIEW vbxx_v_bron_export_exact_xml oms_kop, -- omschrijving in de kopregel fin_factuur_debiteur_nr, -- crediteur debiteurnummer alg_district_key, + alg_regio_key, fin_factuur_boekmaand ) AS @@ -3927,6 +3945,7 @@ AS SUBSTR(fin_factuur_boekmaand,6,2) oms_kop, fin_factuur_debiteur_nr, alg_district_key, + alg_regio_key, fin_factuur_boekmaand FROM ( SELECT g.fin_factuur_key, opdracht_id, @@ -3950,7 +3969,8 @@ AS g.dagboek, g.afw_dagboek, g.afw_kstdrcode, - e.alg_district_key, + g.alg_district_key, + g.alg_regio_key, g.typefactuur FROM vbxx_v_factuur_gegevens g, vbxx_exp_factuur e @@ -3975,7 +3995,8 @@ AS g.dagboek, g.afw_dagboek, g.afw_kstdrcode, - e.alg_district_key, + g.alg_district_key, + g.alg_regio_key, g.typefactuur) fg, prs_bedrijf b WHERE fg.prs_bedrijf_key = b.prs_bedrijf_key @@ -3985,16 +4006,18 @@ AS CREATE OR REPLACE PROCEDURE vbxx_select_exact_xml (p_applname IN VARCHAR2, p_applrun IN VARCHAR2, p_dagboek IN VARCHAR2, - p_district_key IN NUMBER + p_district_key IN NUMBER, + p_regio_key IN NUMBER DEFAULT NULL ) AS CURSOR c(c_dagboek VARCHAR2) IS - SELECT crdnr, factuur_nr, MAX(datum) datum, MAX(oms_kop) oms_kop - FROM vbxx_v_bron_export_exact_xml - WHERE c_dagboek = dagboek - AND (alg_district_key = p_district_key OR p_district_key = -1) - GROUP BY crdnr, factuur_nr; + SELECT x.crdnr, x.factuur_nr, MAX(x.datum) datum, MAX(x.oms_kop) oms_kop + FROM vbxx_v_bron_export_exact_xml x + WHERE c_dagboek = x.dagboek + AND (x.alg_district_key = p_district_key OR p_district_key IS NULL) + AND (x.alg_regio_key = p_regio_key OR p_regio_key IS NULL) + GROUP BY x.crdnr, x.factuur_nr; CURSOR c_sub (c_crdnr VARCHAR2, c_factuur_nr VARCHAR2) IS @@ -4036,42 +4059,6 @@ BEGIN DELETE fac_rapport WHERE fac_rapport_node = v_bestand; - -- Bepaling boekmaand - --IF TO_NUMBER(TO_CHAR(SYSDATE, 'DD')) < 11 - --THEN - -- v_boekmaand := TRUNC(ADD_MONTHS(SYSDATE,-1)); - --ELSE - -- v_boekmaand := TRUNC(SYSDATE); - --END IF; - - -- Verwijder het kenmerk boekstuknummer van de facturen die niet op verwerkt staan - DELETE fin_kenmerkfactuur kf - WHERE fin_kenmerk_key = 1 - AND SUBSTR(fin_kenmerkfactuur_waarde, 3,2) = p_dagboek - AND fin_factuur_key IN (SELECT fin_factuur_key - FROM fin_factuur - WHERE fin_factuur_statuses_key <> 7) - AND VBXX.bepaal_fin_district(kf.fin_factuur_key) = p_district_key; - - -- Bewaar de factuur keys in een tijdelijke tabel zodat bij het verwerken (nieuwe export) - -- deze keys gebruikt kunnen worden. - DELETE vbxx_exp_factuur - WHERE dagboek = p_dagboek - AND alg_district_key = p_district_key; - - INSERT INTO vbxx_exp_factuur (fin_factuur_key, dagboek, alg_district_key) - ( SELECT DISTINCT fg.fin_factuur_key, fg.dagboek, p_district_key - FROM vbxx_v_factuur_gegevens fg, - prs_bedrijf b - WHERE fg.prs_bedrijf_key = b.prs_bedrijf_key - AND b.prs_leverancier_nr IS NOT NULL - AND fg.fin_factuur_statuses_key = 6 - AND fg.fin_factuur_datum > SYSDATE - (5 * 365) -- Check op geldige factuurdatum: - AND fg.fin_factuur_datum < SYSDATE + 365 -- facturen mogen niet ouder zijn dan 5 jaar of meer dan één jaar in de toekomst. - AND (fg.alg_district_key = p_district_key OR p_district_key = -1) -- Multi-client heeft een district key. Bij single client is deze -1 - AND dagboek = p_dagboek - ); - -- wat is de key van het kenmerk boekstuknummer? SELECT fin_kenmerk_key INTO v_bkstknr_kenmerk_key @@ -4084,15 +4071,72 @@ BEGIN FROM fin_kenmerk k WHERE k.fin_kenmerk_code = 'FACTUURBESTAND'; - -- Bepaal het boekstuknummer (key 3) met het hoogste nummer van dit jaar - -- ## AAIT#36589 - SELECT MAX(fin_kenmerkfactuur_waarde) - INTO v_boekstuknummer - FROM fin_kenmerkfactuur kf - WHERE fin_kenmerk_key = v_bkstknr_kenmerk_key - AND SUBSTR(fin_kenmerkfactuur_waarde,1,2) = TO_CHAR(SYSDATE, 'YY') - AND SUBSTR(fin_kenmerkfactuur_waarde,3,2) = p_dagboek - AND VBXX.bepaal_fin_district(kf.fin_factuur_key) = p_district_key; + IF p_regio_key IS NOT NULL + THEN + -- Verwijder het kenmerk boekstuknummer van de facturen die niet op verwerkt staan binnen de aangegeven regio + DELETE fin_kenmerkfactuur kf + WHERE fin_kenmerk_key = 1 + AND SUBSTR(fin_kenmerkfactuur_waarde, 3,2) = p_dagboek + AND fin_factuur_key IN (SELECT fin_factuur_key + FROM fin_factuur + WHERE fin_factuur_statuses_key <> 7) + AND VBXX.bepaal_fin_regio(kf.fin_factuur_key) = p_regio_key; + + -- verwijder de tijdelijke opslag met factuurnummers om in de verwerk te gebruiken + DELETE vbxx_exp_factuur e + WHERE e.dagboek = p_dagboek + AND VBXX.bepaal_fin_regio(e.fin_factuur_key) = p_regio_key; + + -- Bepaal het boekstuknummer (key 3) met het hoogste nummer van dit jaar + -- ## AAIT#36589 + SELECT MAX(fin_kenmerkfactuur_waarde) + INTO v_boekstuknummer + FROM fin_kenmerkfactuur kf + WHERE fin_kenmerk_key = v_bkstknr_kenmerk_key + AND SUBSTR(fin_kenmerkfactuur_waarde,1,2) = TO_CHAR(SYSDATE, 'YY') + AND SUBSTR(fin_kenmerkfactuur_waarde,3,2) = p_dagboek + AND VBXX.bepaal_fin_regio(kf.fin_factuur_key) = p_regio_key; + ELSE + -- Verwijder het kenmerk boekstuknummer van de facturen die niet op verwerkt staan binnen het aangegeven district + DELETE fin_kenmerkfactuur kf + WHERE fin_kenmerk_key = 1 + AND SUBSTR(fin_kenmerkfactuur_waarde, 3,2) = p_dagboek + AND fin_factuur_key IN (SELECT fin_factuur_key + FROM fin_factuur + WHERE fin_factuur_statuses_key <> 7) + AND VBXX.bepaal_fin_district(kf.fin_factuur_key) = p_district_key; + + -- verwijder de tijdelijke opslag met factuurnummers om in de verwerk te gebruiken + DELETE vbxx_exp_factuur e + WHERE e.dagboek = p_dagboek + AND e.alg_district_key = p_district_key; + + -- Bepaal het boekstuknummer (key 3) met het hoogste nummer van dit jaar + -- ## AAIT#36589 + SELECT MAX(fin_kenmerkfactuur_waarde) + INTO v_boekstuknummer + FROM fin_kenmerkfactuur kf + WHERE fin_kenmerk_key = v_bkstknr_kenmerk_key + AND SUBSTR(fin_kenmerkfactuur_waarde,1,2) = TO_CHAR(SYSDATE, 'YY') + AND SUBSTR(fin_kenmerkfactuur_waarde,3,2) = p_dagboek + AND VBXX.bepaal_fin_district(kf.fin_factuur_key) = p_district_key; + END IF; + + -- Bewaar de factuur keys in een tijdelijke tabel zodat bij het verwerken (nieuwe export) + -- deze keys gebruikt kunnen worden. + INSERT INTO vbxx_exp_factuur (fin_factuur_key, dagboek, alg_district_key) + ( SELECT DISTINCT fg.fin_factuur_key, fg.dagboek, p_district_key + FROM vbxx_v_factuur_gegevens fg, + prs_bedrijf b + WHERE fg.prs_bedrijf_key = b.prs_bedrijf_key + AND b.prs_leverancier_nr IS NOT NULL + AND fg.fin_factuur_statuses_key = 6 + AND fg.fin_factuur_datum > SYSDATE - (5 * 365) -- Check op geldige factuurdatum: + AND fg.fin_factuur_datum < SYSDATE + 365 -- facturen mogen niet ouder zijn dan 5 jaar of meer dan één jaar in de toekomst. + AND (fg.alg_district_key = p_district_key OR p_district_key IS NULL) -- oude klanten zijn gescoped op district + AND (fg.alg_regio_key = p_regio_key OR p_regio_key IS NULL) -- de rabobank is gescoped op regio + AND fg.dagboek = p_dagboek + ); IF v_boekstuknummer IS NULL THEN @@ -4221,7 +4265,8 @@ CREATE OR REPLACE PROCEDURE vbxx_select_verwerk_exact ( p_applname IN VARCHAR2, p_applrun IN VARCHAR2, p_dagboek IN VARCHAR2, - p_district_key IN NUMBER + p_district_key IN NUMBER, + p_regio_key IN NUMBER DEFAULT NULL ) AS CURSOR c_fact @@ -4232,7 +4277,8 @@ AS WHERE f.fin_factuur_key = fg.fin_factuur_key AND fg.fin_factuur_statuses_key = 6 AND f.dagboek = p_dagboek - AND (f.alg_district_key = p_district_key OR p_district_key = -1); + AND (fg.alg_district_key = p_district_key OR p_district_key IS NULL) + AND (fg.alg_regio_key = p_regio_key OR p_regio_key IS NULL); v_errormsg VARCHAR (200); oracle_err_num NUMBER; @@ -4296,9 +4342,16 @@ BEGIN END; END LOOP; -- verwijder de enties uit de tijdelijke tabel. - DELETE vbxx_exp_factuur - WHERE dagboek = p_dagboek - AND (alg_district_key = p_district_key OR p_district_key = -1); + IF p_district_key IS NOT NULL + THEN + DELETE vbxx_exp_factuur e + WHERE e.dagboek = p_dagboek + AND e.alg_district_key = p_district_key; + ELSE + DELETE vbxx_exp_factuur e + WHERE e.dagboek = p_dagboek + AND alg_district_key IN (SELECT d.alg_district_key FROM alg_district d WHERE d.alg_regio_key = p_regio_key); + END IF; END; / @@ -4390,6 +4443,7 @@ AS nietdoorbelasten, o.mld_opdr_key, l.alg_district_key, + l.alg_locatie_key fclt_x_locatie, COALESCE(kso.prs_kostensoort_oms, ksm.prs_kostensoort_oms) opdracht_nen_code, COALESCE(kso.prs_kostensoort_refcode, ksm.prs_kostensoort_refcode) opdracht_nen_exact_code, COALESCE(kso.prs_kostensoort_opmerking, ksm.prs_kostensoort_opmerking) opdracht_nen_omschrijving, @@ -4498,7 +4552,8 @@ SELECT fin_verkoopfactuur_omschr meldingnummer, fin_verkoopfactuur_maand boekmaand, mld_opdr_key, kso.prs_kostensoort_oms afw_opdracht_nen_omschrijving, - kso.prs_kostensoort_refcode afw_opdracht_nen_code + kso.prs_kostensoort_refcode afw_opdracht_nen_code, + l.alg_locatie_key fclt_x_locatie FROM fin_verkoopfactuur vf, prs_v_perslid_fullnames_all pf, mld_statuses ms,