diff --git a/BSSC/bssc.sql b/BSSC/bssc.sql index 4348ddc80..420282c6e 100644 --- a/BSSC/bssc.sql +++ b/BSSC/bssc.sql @@ -693,12 +693,6 @@ AS AND p.prs_perslid_key = pf.prs_perslid_key; -- BSSC#55692: Facturatie verhuur (M2 en meer)! --- V Huur niet op basis van Tarieftabel, maar kenmerk 861=Huurprijs (per jaar) --- V Geen automatische facturatie op basis van kenmerk 862=Checkbox --- V Kenmerk 870=Start facturatie huur --- V Kenmerk 901=Duty manager --- V Kenmerk 902=Koffieautomaten --- V Kenmerk 641=Onbelaste huurder??? CREATE OR REPLACE VIEW bssc_v_fact_actual AS WITH lopendeperiode AS (SELECT COALESCE (MAX (TO_CHAR (LAST_DAY (fac.safe_to_date (fin_verkoopfactuur_maand, 'yyyymm')) + 1, 'yyyymm')), '202301') maand @@ -1146,7 +1140,6 @@ AS '966', '8604', -- Schoonmaak '982', '7005', -- Koffieautomaten '983', '7006', -- Duty manager - '985', '9999', -- Gebruik Forum/TODO '9999') grtboekrek, -- Hardcoded? TO_NUMBER (NULL) mld_melding_key -- Correctiemelding-key @@ -1196,7 +1189,7 @@ AS LEFT JOIN cnt_kenmerkcontract jbw ON x.cnt_contract_key = jbw.cnt_contract_key AND jbw.cnt_kenmerkcontract_verwijder IS NULL - AND jbw.cnt_kenmerk_key IN (963, 964, 965, 966, 982, 983, 985) -- Overige maandbedragen + AND jbw.cnt_kenmerk_key IN (963, 964, 965, 966, 982, 983) -- Overige maandbedragen LEFT JOIN cnt_kenmerk jbw_k ON jbw.cnt_kenmerk_key = jbw_k.cnt_kenmerk_key AND jbw_k.cnt_kenmerk_verwijder IS NULL @@ -1206,7 +1199,7 @@ AS UNION ALL -- Parkeren CHV (vooruit)! SELECT '*CONCEPT*' fin_verkoopfactuur_id, 'CHV' || TRIM (x.cnt_contract_nummer) po_nr, -- PO - '9999' || TO_CHAR (x.ins_discipline_key) sortering, -- Sorteren op (eigen) discipline_key; 8 posities! + '9901' || TO_CHAR (x.ins_discipline_key) sortering, -- Sorteren op (eigen) discipline_key; 8 posities! COALESCE (ks.prs_kostensoort_refcode, ks.prs_kostensoort_opmerking) regel, -- Parkeren CHV NULL aanvrager, -- !!! NULL regel_oms, -- !!! @@ -1221,9 +1214,9 @@ AS x.adres, x.postcode, x.plaats, x.land, x.prs_kostenplaats_key, x.prs_kostenplaats_nr, x.prs_kostenplaats_omschrijving, x.prs_kostenplaatsgrp_oms, --x.prs_kostensoort_oms, x.prs_kostensoort_opmerking, x.prs_kostensoort_refcode, x.prs_kostensoortgrp_oms, - DECODE (btwvl.prs_kenmerklink_waarde, '1', 'V', DECODE (x.btw, 0, '0', 'H')) fin_btwtabelwaarde_code, - DECODE (btwvl.prs_kenmerklink_waarde, '1', 'Verlegd', DECODE (x.btw, 0, 'Nul', 'Hoog')) fin_btwtabelwaarde_oms, - DECODE (btwvl.prs_kenmerklink_waarde, '1', 0, DECODE (x.btw, 0, 0, 21)) fin_btwtabelwaarde_perc, + DECODE (btwvl.prs_kenmerklink_waarde, '1', 'V', DECODE (oh.cnt_kenmerkcontract_waarde, '921', '0', 'H')) fin_btwtabelwaarde_code, + DECODE (btwvl.prs_kenmerklink_waarde, '1', 'Verlegd', DECODE (oh.cnt_kenmerkcontract_waarde, '921', 'Nul', 'Hoog')) fin_btwtabelwaarde_oms, + DECODE (btwvl.prs_kenmerklink_waarde, '1', 0, DECODE (oh.cnt_kenmerkcontract_waarde, '921', 0, 21)) fin_btwtabelwaarde_perc, DECODE (btwvl.prs_kenmerklink_waarde, '1', 1, TO_NUMBER (NULL)) fin_btwtabelwaarde_verlegd, x.maand, TO_CHAR (TO_DATE (x.maand, 'yyyymm'), 'dd-mm-yyyy') mndbegin, @@ -1241,14 +1234,15 @@ AS fac.safe_to_number (aantal.cnt_kenmerkcontract_waarde) * fac.safe_to_number (bedrag.cnt_kenmerkcontract_waarde) * 1/12, 2) - mndnet, -- Netto maandbedrag (incl. kortingspercentage) + mndnet, -- Netto maandbedrag ROUND (((LEAST (TRUNC (x.lt), LAST_DAY (TO_DATE (x.maand, 'yyyymm'))) - GREATEST (TRUNC (x.lv), TO_DATE (x.maand, 'yyyymm')) + 1) / (LAST_DAY (TO_DATE (x.maand, 'yyyymm')) - TO_DATE (x.maand, 'yyyymm') + 1)) * fac.safe_to_number (aantal.cnt_kenmerkcontract_waarde) * fac.safe_to_number (bedrag.cnt_kenmerkcontract_waarde) * - DECODE (btwvl.prs_kenmerklink_waarde, '1', 0, x.btw) * + DECODE (btwvl.prs_kenmerklink_waarde, '1', 0, DECODE (oh.cnt_kenmerkcontract_waarde, '921', 0, 0.21)) * 1/12, 2) mndbtw, -- BTW maandbedrag - TRIM (ks.prs_kostensoort_oms) grtboekrek, + --DECODE (oh.cnt_kenmerkcontract_waarde, '921', '9999', '8404') grtboekrek, + TRIM (ks.prs_kostensoort_oms) grtboekrek, -- 8404 TO_NUMBER (NULL) mld_melding_key -- Correctiemelding-key FROM (SELECT c.ins_discipline_key, c.cnt_contract_key, @@ -1257,7 +1251,6 @@ AS c.cnt_contract_omschrijving, c.cnt_contract_looptijd_van lv, c.cnt_contract_looptijd_tot lt, b.prs_bedrijf_key, b.prs_bedrijf_naam, TRIM (chvnr.prs_kenmerklink_waarde) debiteur_nr, - 0.21 btw, DECODE (b.prs_bedrijf_post_adres, NULL, b.prs_bedrijf_bezoek_adres, b.prs_bedrijf_post_adres) adres, DECODE (b.prs_bedrijf_post_adres, NULL, b.prs_bedrijf_bezoek_postcode, b.prs_bedrijf_post_postcode) postcode, DECODE (b.prs_bedrijf_post_adres, NULL, b.prs_bedrijf_bezoek_plaats, b.prs_bedrijf_post_plaats) plaats, @@ -1294,6 +1287,10 @@ AS ON x.cnt_contract_key = bedrag.cnt_contract_key AND bedrag.cnt_kenmerkcontract_verwijder IS NULL AND bedrag.cnt_kenmerk_key = 416 -- Bedrag + LEFT JOIN cnt_kenmerkcontract oh + ON x.cnt_contract_key = oh.cnt_contract_key + AND oh.cnt_kenmerkcontract_verwijder IS NULL + AND oh.cnt_kenmerk_key = 1041 -- Onbelaste huurder LEFT JOIN cnt_discipline cd ON x.ins_discipline_key = cd.ins_discipline_key LEFT JOIN prs_kostensoort ks @@ -1301,10 +1298,110 @@ AS WHERE gaf.cnt_kenmerkcontract_waarde IS NULL -- COALESCE (gaf.cnt_kenmerkcontract_waarde, 0) = 0 AND COALESCE (fac.safe_to_number (aantal.cnt_kenmerkcontract_waarde), 0) > 0 AND COALESCE (fac.safe_to_number (bedrag.cnt_kenmerkcontract_waarde), 0) > 0 + UNION ALL -- Vervangende toeslag op Parkeren CHV (vooruit)! + SELECT '*CONCEPT*' fin_verkoopfactuur_id, + 'CHV' || TRIM (x.cnt_contract_nummer) po_nr, -- PO + '9902' || TO_CHAR (x.ins_discipline_key) sortering, -- Sorteren op (eigen) discipline_key; 8 posities! + 'CHV - Vervangende toeslag' regel, -- Vervangende toeslag + NULL aanvrager, -- !!! + NULL regel_oms, -- !!! + TO_CHAR (SYSDATE, 'dd-mm-yyyy') factuurdatum, TO_CHAR (SYSDATE + 30, 'dd-mm-yyyy') vervaldatum, + 'contract' xmlnode, + x.cnt_contract_key refkey, -- !!! + x.cnt_contract_nummer_intern || '/' || COALESCE (x.cnt_contract_versie, '0') refid, -- !!! + x.lv, + x.prs_bedrijf_key, x.prs_bedrijf_naam prs_debiteur_naam, x.debiteur_nr, + x.cnt_contract_omschrijving beschrijving, + NULL contactpersoon, + x.adres, x.postcode, x.plaats, x.land, + x.prs_kostenplaats_key, x.prs_kostenplaats_nr, x.prs_kostenplaats_omschrijving, x.prs_kostenplaatsgrp_oms, + --x.prs_kostensoort_oms, x.prs_kostensoort_opmerking, x.prs_kostensoort_refcode, x.prs_kostensoortgrp_oms, + '0' fin_btwtabelwaarde_code, + 'Nul' fin_btwtabelwaarde_oms, + 0 fin_btwtabelwaarde_perc, + TO_NUMBER (NULL) fin_btwtabelwaarde_verlegd, -- Of 1? + x.maand, + TO_CHAR (TO_DATE (x.maand, 'yyyymm'), 'dd-mm-yyyy') mndbegin, + TO_CHAR (LAST_DAY (TO_DATE (x.maand, 'yyyymm')), 'dd-mm-yyyy') mndeinde, + TO_CHAR (GREATEST (TRUNC (x.lv), TO_DATE (x.maand, 'yyyymm')), 'dd-mm-yyyy') dagbegin, + TO_CHAR (LEAST (TRUNC (x.lt), LAST_DAY (TO_DATE (x.maand, 'yyyymm'))), 'dd-mm-yyyy') dageinde, + LAST_DAY (TO_DATE (x.maand, 'yyyymm')) - TO_DATE (x.maand, 'yyyymm') + 1 mndbes, -- Beschikbaar + LEAST (TRUNC (x.lt), LAST_DAY (TO_DATE (x.maand, 'yyyymm'))) - GREATEST (TRUNC (x.lv), TO_DATE (x.maand, 'yyyymm')) + 1 mndbez, -- Bezet + fac.safe_to_number (aantal.cnt_kenmerkcontract_waarde) aantal, + fac.safe_to_number (bedrag.cnt_kenmerkcontract_waarde) * (verv_toeslag_ud.fac_usrdata_prijs - 1) bedrag, -- Jaarbedrag * Vervangend toeslagperc. + TO_NUMBER (NULL) vvo_toeslag, -- VVO toeslagpercentage + verv_toeslag.cnt_kenmerk_key regel_key, + NULL alg_onroerendgoed_type, NULL alg_onroerendgoed_keys, NULL alg_plaatsaanduiding, + ROUND (((LEAST (TRUNC (x.lt), LAST_DAY (TO_DATE (x.maand, 'yyyymm'))) - GREATEST (TRUNC (x.lv), TO_DATE (x.maand, 'yyyymm')) + 1) / (LAST_DAY (TO_DATE (x.maand, 'yyyymm')) - TO_DATE (x.maand, 'yyyymm') + 1)) * + fac.safe_to_number (aantal.cnt_kenmerkcontract_waarde) * + fac.safe_to_number (bedrag.cnt_kenmerkcontract_waarde) * (verv_toeslag_ud.fac_usrdata_prijs - 1) * + 1/12, 2) + mndnet, -- Netto maandbedrag (incl. kortingspercentage) + 0 mndbtw, -- BTW maandbedrag + --'9999' grtboekrek, + TRIM (ks.prs_kostensoort_oms) grtboekrek, -- 8404 + TO_NUMBER (NULL) mld_melding_key -- Correctiemelding-key + FROM (SELECT c.ins_discipline_key, + c.cnt_contract_key, + c.cnt_contract_nummer_intern, c.cnt_contract_versie, + c.cnt_contract_nummer, + c.cnt_contract_omschrijving, + c.cnt_contract_looptijd_van lv, c.cnt_contract_looptijd_tot lt, + b.prs_bedrijf_key, b.prs_bedrijf_naam, TRIM (chvnr.prs_kenmerklink_waarde) debiteur_nr, + DECODE (b.prs_bedrijf_post_adres, NULL, b.prs_bedrijf_bezoek_adres, b.prs_bedrijf_post_adres) adres, + DECODE (b.prs_bedrijf_post_adres, NULL, b.prs_bedrijf_bezoek_postcode, b.prs_bedrijf_post_postcode) postcode, + DECODE (b.prs_bedrijf_post_adres, NULL, b.prs_bedrijf_bezoek_plaats, b.prs_bedrijf_post_plaats) plaats, + DECODE (b.prs_bedrijf_post_adres, NULL, b.prs_bedrijf_bezoek_land, b.prs_bedrijf_post_land) land, + kp.prs_kostenplaats_key, kp.prs_kostenplaats_nr, kp.prs_kostenplaats_omschrijving, kpg.prs_kostenplaatsgrp_oms, + lp.maand + FROM lopendeperiode lp, + cnt_v_aanwezigcontract c, + prs_bedrijf b, + (SELECT * FROM prs_v_aanwezigkenmerklink WHERE prs_kenmerk_key = 1221) chvnr, + prs_kostenplaats kp, + prs_kostenplaatsgrp kpg + WHERE c.ins_discipline_key = 2003 -- Parkeren CHV + AND c.cnt_contract_status = 0 -- Definitief + AND TRUNC (c.cnt_contract_looptijd_van) < LAST_DAY (TO_DATE (lp.maand || '01', 'yyyymmdd')) -- Van-datum < einde te factureren maand + AND c.cnt_contract_looptijd_tot > TO_DATE (lp.maand || '01', 'yyyymmdd') -- Tot-datum > begin te factureren maand + AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key + AND b.prs_bedrijf_key = chvnr.prs_link_key(+) + AND c.prs_kostenplaats_key = kp.prs_kostenplaats_key(+) + AND kp.prs_kostenplaatsgrp_key = kpg.prs_kostenplaatsgrp_key(+)) x + LEFT JOIN prs_kenmerklink btwvl + ON x.prs_bedrijf_key = btwvl.prs_link_key + AND btwvl.prs_kenmerklink_verwijder IS NULL + AND btwvl.prs_kenmerk_key = -1 -- BTW verlegd + LEFT JOIN cnt_kenmerkcontract gaf + ON x.cnt_contract_key = gaf.cnt_contract_key + AND gaf.cnt_kenmerkcontract_verwijder IS NULL + AND gaf.cnt_kenmerk_key = 864 -- Geen automatische facturatie + LEFT JOIN cnt_kenmerkcontract aantal + ON x.cnt_contract_key = aantal.cnt_contract_key + AND aantal.cnt_kenmerkcontract_verwijder IS NULL + AND aantal.cnt_kenmerk_key = 415 -- Aantal + LEFT JOIN cnt_kenmerkcontract bedrag + ON x.cnt_contract_key = bedrag.cnt_contract_key + AND bedrag.cnt_kenmerkcontract_verwijder IS NULL + AND bedrag.cnt_kenmerk_key = 416 -- Bedrag + LEFT JOIN cnt_kenmerkcontract verv_toeslag + ON x.cnt_contract_key = verv_toeslag.cnt_contract_key + AND verv_toeslag.cnt_kenmerkcontract_verwijder IS NULL + AND verv_toeslag.cnt_kenmerk_key = 1042 -- Vervangende toeslag + LEFT JOIN fac_v_aanwezigusrdata verv_toeslag_ud + ON fac.safe_to_number (verv_toeslag.cnt_kenmerkcontract_waarde) = verv_toeslag_ud.fac_usrdata_key + LEFT JOIN cnt_discipline cd + ON x.ins_discipline_key = cd.ins_discipline_key + LEFT JOIN prs_kostensoort ks + ON cd.prs_kostensoort_key = ks.prs_kostensoort_key + WHERE gaf.cnt_kenmerkcontract_waarde IS NULL -- COALESCE (gaf.cnt_kenmerkcontract_waarde, 0) = 0 + AND COALESCE (fac.safe_to_number (aantal.cnt_kenmerkcontract_waarde), 0) > 0 + AND COALESCE (fac.safe_to_number (bedrag.cnt_kenmerkcontract_waarde), 0) > 0 + AND verv_toeslag_ud.fac_usrdata_prijs > 1 UNION ALL -- Parkeren CMD (achteraf)! SELECT '*CONCEPT*' fin_verkoopfactuur_id, 'CMD' || TRIM (x.cnt_contract_nummer) po_nr, -- PO - '9999' || TO_CHAR (x.ins_discipline_key) sortering, -- Sorteren op (eigen) discipline_key; 8 posities! + '9901' || TO_CHAR (x.ins_discipline_key) sortering, -- Sorteren op (eigen) discipline_key; 8 posities! COALESCE (ks.prs_kostensoort_refcode, ks.prs_kostensoort_opmerking) regel, -- Parkeren CMD NULL aanvrager, -- !!! NULL regel_oms, -- !!! @@ -1346,7 +1443,7 @@ AS DECODE (btwvl.prs_kenmerklink_waarde, '1', 0, x.btw) * 1/12, 2) mndbtw, -- BTW maandbedrag - TRIM (ks.prs_kostensoort_oms) grtboekrek, + TRIM (ks.prs_kostensoort_oms) grtboekrek, -- 8415 TO_NUMBER (NULL) mld_melding_key -- Correctiemelding-key FROM (SELECT c.ins_discipline_key, c.cnt_contract_key, @@ -1402,7 +1499,7 @@ AS UNION ALL -- Deelnemers CMD (achteraf)! SELECT '*CONCEPT*' fin_verkoopfactuur_id, 'CMD' || TRIM (x.cnt_contract_nummer) po_nr, -- PO - '9999' || TO_CHAR (x.ins_discipline_key) sortering, -- Sorteren op (eigen) discipline_key; 8 posities! + '9901' || TO_CHAR (x.ins_discipline_key) sortering, -- Sorteren op (eigen) discipline_key; 8 posities! 'CMD - ' || sd_ud.fac_usrdata_omschr regel, -- Deelnemers CMD NULL aanvrager, -- !!! NULL regel_oms, -- !!! @@ -1605,10 +1702,11 @@ BEGIN -- IF nacht na 1e werkdag van de maand (én geen weekend én geen vrije dag)! -- count_work_days (d1,d2) bepaalt het #werkdagen van d1 tot d2 (als d1=d2, -- dan return 0); daarom bepalen tov. laatste dag van vorige maand! + --IF TO_CHAR (SYSDATE, 'dd') = '15' -- TODO:Weer terug naar nacht na 1e werkdag van de maand! --IF FAC.count_work_days (TRUNC (SYSDATE, 'mm') - 1, SYSDATE - 1) = 1 -- Nacht na 1e werkdag van de maand! -- AND TO_CHAR (SYSDATE - 1, 'd') BETWEEN '2' AND '6' -- AND v_holiday = 0 - IF TO_CHAR (SYSDATE, 'dd') = '05' -- TODO:Weer terug naar nacht na 1e werkdag van de maand! + IF TO_CHAR (SYSDATE, 'dd') = '15' -- TODO:Weer terug naar nacht na 1e werkdag van de maand! THEN v_fact_count := 0; v_amount_sum := 0; @@ -1872,7 +1970,7 @@ AS WHERE mld_kenmerk_key = 745) ks -- Kostensoort WHERE m.mld_stdmelding_key IN (1481, 1482) -- Fin. correctie CHV/CMD AND m.prs_perslid_key_voor = pf.prs_perslid_key - AND m.mld_melding_status = 5 -- Afgemeld + AND m.mld_melding_status IN (4, 5) -- In behandeling/Afgemeld AND m.mld_melding_key = km.mld_melding_key AND km.mld_kenmerk_key IN (861, 861) -- Factuurreferentie CHV/CMD AND fac.safe_to_number (km.mld_kenmerkmelding_waarde) = vf.fin_verkoopfactuurkop_key @@ -1962,7 +2060,7 @@ AS WHERE mld_kenmerk_key = 750) ks -- Kostensoort WHERE m.mld_stdmelding_key IN (1481, 1482) -- Fin. correctie CHV/CMD AND m.prs_perslid_key_voor = pf.prs_perslid_key - AND m.mld_melding_status = 5 -- Afgemeld + AND m.mld_melding_status IN (4, 5) -- In behandeling/Afgemeld AND m.mld_melding_key = km.mld_melding_key AND km.mld_kenmerk_key IN (861, 861) -- Factuurreferentie CHV/CMD AND fac.safe_to_number (km.mld_kenmerkmelding_waarde) = vf.fin_verkoopfactuurkop_key @@ -2052,7 +2150,7 @@ AS WHERE mld_kenmerk_key = 765) ks -- Kostensoort WHERE m.mld_stdmelding_key IN (1481, 1482) -- Fin. correctie CHV/CMD AND m.prs_perslid_key_voor = pf.prs_perslid_key - AND m.mld_melding_status = 5 -- Afgemeld + AND m.mld_melding_status IN (4, 5) -- In behandeling/Afgemeld AND m.mld_melding_key = km.mld_melding_key AND km.mld_kenmerk_key IN (861, 861) -- Factuurreferentie CHV/CMD AND fac.safe_to_number (km.mld_kenmerkmelding_waarde) = vf.fin_verkoopfactuurkop_key @@ -2142,7 +2240,7 @@ AS WHERE mld_kenmerk_key = 770) ks -- Kostensoort WHERE m.mld_stdmelding_key IN (1481, 1482) -- Fin. correctie CHV/CMD AND m.prs_perslid_key_voor = pf.prs_perslid_key - AND m.mld_melding_status = 5 -- Afgemeld + AND m.mld_melding_status IN (4, 5) -- In behandeling/Afgemeld AND m.mld_melding_key = km.mld_melding_key AND km.mld_kenmerk_key IN (861, 861) -- Factuurreferentie CHV/CMD AND fac.safe_to_number (km.mld_kenmerkmelding_waarde) = vf.fin_verkoopfactuurkop_key @@ -2232,7 +2330,7 @@ AS WHERE mld_kenmerk_key = 775) ks -- Kostensoort WHERE m.mld_stdmelding_key IN (1481, 1482) -- Fin. correctie CHV/CMD AND m.prs_perslid_key_voor = pf.prs_perslid_key - AND m.mld_melding_status = 5 -- Afgemeld + AND m.mld_melding_status IN (4, 5) -- In behandeling/Afgemeld AND m.mld_melding_key = km.mld_melding_key AND km.mld_kenmerk_key IN (861, 861) -- Factuurreferentie CHV/CMD AND fac.safe_to_number (km.mld_kenmerkmelding_waarde) = vf.fin_verkoopfactuurkop_key @@ -2335,10 +2433,10 @@ AS WHERE mld_kenmerk_key = 905) ks -- Kostensoort WHERE m.mld_stdmelding_key IN (1641, 1642) -- Losse verkoop CHV/CMD AND m.prs_perslid_key_voor = pf.prs_perslid_key - AND m.mld_melding_status = 5 -- Afgemeld + AND m.mld_melding_status IN (4, 5) -- In behandeling/Afgemeld AND m.mld_melding_key = deb.mld_melding_key - AND MOD (deb.debiteur_id, 100000000) = cp.prs_contactpersoon_key - AND COALESCE (cp.prs_bedrijf_key, MOD (deb.debiteur_id, 100000000)) = b.prs_bedrijf_key + AND MOD (deb.debiteur_id, 100000000) = cp.prs_contactpersoon_key(+) + AND COALESCE (cp.prs_bedrijf_key, MOD (deb.debiteur_id, 100000000)) = b.prs_bedrijf_key(+) AND b.prs_bedrijf_key = cmdnr.prs_link_key(+) AND b.prs_bedrijf_key = chvnr.prs_link_key(+) --AND b.prs_bedrijf_key = btwnr.prs_link_key(+) @@ -2438,10 +2536,10 @@ AS WHERE mld_kenmerk_key = 910) ks -- Kostensoort WHERE m.mld_stdmelding_key IN (1641, 1642) -- Losse verkoop CHV/CMD AND m.prs_perslid_key_voor = pf.prs_perslid_key - AND m.mld_melding_status = 5 -- Afgemeld + AND m.mld_melding_status IN (4, 5) -- In behandeling/Afgemeld AND m.mld_melding_key = deb.mld_melding_key - AND MOD (deb.debiteur_id, 100000000) = cp.prs_contactpersoon_key - AND COALESCE (cp.prs_bedrijf_key, MOD (deb.debiteur_id, 100000000)) = b.prs_bedrijf_key + AND MOD (deb.debiteur_id, 100000000) = cp.prs_contactpersoon_key(+) + AND COALESCE (cp.prs_bedrijf_key, MOD (deb.debiteur_id, 100000000)) = b.prs_bedrijf_key(+) AND b.prs_bedrijf_key = cmdnr.prs_link_key(+) AND b.prs_bedrijf_key = chvnr.prs_link_key(+) --AND b.prs_bedrijf_key = btwnr.prs_link_key(+) @@ -2541,10 +2639,10 @@ AS WHERE mld_kenmerk_key = 915) ks -- Kostensoort WHERE m.mld_stdmelding_key IN (1641, 1642) -- Losse verkoop CHV/CMD AND m.prs_perslid_key_voor = pf.prs_perslid_key - AND m.mld_melding_status = 5 -- Afgemeld + AND m.mld_melding_status IN (4, 5) -- In behandeling/Afgemeld AND m.mld_melding_key = deb.mld_melding_key - AND MOD (deb.debiteur_id, 100000000) = cp.prs_contactpersoon_key - AND COALESCE (cp.prs_bedrijf_key, MOD (deb.debiteur_id, 100000000)) = b.prs_bedrijf_key + AND MOD (deb.debiteur_id, 100000000) = cp.prs_contactpersoon_key(+) + AND COALESCE (cp.prs_bedrijf_key, MOD (deb.debiteur_id, 100000000)) = b.prs_bedrijf_key(+) AND b.prs_bedrijf_key = cmdnr.prs_link_key(+) AND b.prs_bedrijf_key = chvnr.prs_link_key(+) --AND b.prs_bedrijf_key = btwnr.prs_link_key(+) @@ -2644,10 +2742,10 @@ AS WHERE mld_kenmerk_key = 920) ks -- Kostensoort WHERE m.mld_stdmelding_key IN (1641, 1642) -- Losse verkoop CHV/CMD AND m.prs_perslid_key_voor = pf.prs_perslid_key - AND m.mld_melding_status = 5 -- Afgemeld + AND m.mld_melding_status IN (4, 5) -- In behandeling/Afgemeld AND m.mld_melding_key = deb.mld_melding_key - AND MOD (deb.debiteur_id, 100000000) = cp.prs_contactpersoon_key - AND COALESCE (cp.prs_bedrijf_key, MOD (deb.debiteur_id, 100000000)) = b.prs_bedrijf_key + AND MOD (deb.debiteur_id, 100000000) = cp.prs_contactpersoon_key(+) + AND COALESCE (cp.prs_bedrijf_key, MOD (deb.debiteur_id, 100000000)) = b.prs_bedrijf_key(+) AND b.prs_bedrijf_key = cmdnr.prs_link_key(+) AND b.prs_bedrijf_key = chvnr.prs_link_key(+) --AND b.prs_bedrijf_key = btwnr.prs_link_key(+) @@ -2747,10 +2845,10 @@ AS WHERE mld_kenmerk_key = 925) ks -- Kostensoort WHERE m.mld_stdmelding_key IN (1641, 1642) -- Losse verkoop CHV/CMD AND m.prs_perslid_key_voor = pf.prs_perslid_key - AND m.mld_melding_status = 5 -- Afgemeld + AND m.mld_melding_status IN (4, 5) -- In behandeling/Afgemeld AND m.mld_melding_key = deb.mld_melding_key - AND MOD (deb.debiteur_id, 100000000) = cp.prs_contactpersoon_key - AND COALESCE (cp.prs_bedrijf_key, MOD (deb.debiteur_id, 100000000)) = b.prs_bedrijf_key + AND MOD (deb.debiteur_id, 100000000) = cp.prs_contactpersoon_key(+) + AND COALESCE (cp.prs_bedrijf_key, MOD (deb.debiteur_id, 100000000)) = b.prs_bedrijf_key(+) AND b.prs_bedrijf_key = cmdnr.prs_link_key(+) AND b.prs_bedrijf_key = chvnr.prs_link_key(+) --AND b.prs_bedrijf_key = btwnr.prs_link_key(+) @@ -3186,6 +3284,7 @@ AS grtboekrek, mld_melding_key FROM bssc_v_addd_correctie + WHERE mld_melding_key > 18833 -- Per 01-12-2022 (18833 laatste melding op 30-11-2022)! UNION ALL -- Losverkoopmeldingen SELECT fin_verkoopfactuur_id, po_nr, sortering, regel, aanvrager, regel_oms, @@ -3202,6 +3301,7 @@ AS grtboekrek, mld_melding_key FROM bssc_v_addd_losverkoop + WHERE mld_melding_key > 18833 -- Per 01-12-2022 (18833 laatste melding op 30-11-2022)! ; CREATE OR REPLACE VIEW bssc_v_addd_frozen @@ -3279,8 +3379,10 @@ AS SELECT '[' || v.regel_oms || '|' || v.prs_debiteur_naam || '|' || REPLACE (REPLACE (REPLACE (v.regel, CHR (10), ''), CHR (13), ' '), '=', '~') || '] ' aanduiding, v.*, m.mld_melding_status - FROM bssc_v_addd_correctie v, mld_melding m -- TODO:VRIJGEGEVEN!!! - WHERE v.refkey = m.mld_melding_key -- Dagelijkse correctiefacturatie (na vrijgave) + FROM bssc_v_addd_correctie v, mld_melding m + WHERE v.mld_melding_key > 18833 -- Per 01-12-2022 (18833 laatste melding op 30-11-2022)! + AND m.mld_melding_status = 5 -- Afgemeld=VRIJGEGEVEN!!! + AND v.mld_melding_key = m.mld_melding_key -- Dagelijkse correctiefacturatie (na vrijgave) ORDER BY v.prs_bedrijf_key, v.regel_oms, -- Factuur per te corrigeren verkoopfactuur v.mld_melding_key, @@ -3292,8 +3394,10 @@ AS SELECT '[' || v.regel_oms || '|' || v.prs_debiteur_naam || '|' || REPLACE (REPLACE (REPLACE (v.regel, CHR (10), ''), CHR (13), ' '), '=', '~') || '] ' aanduiding, v.*, m.mld_melding_status - FROM bssc_v_addd_losverkoop v, mld_melding m -- TODO:VRIJGEGEVEN!!! - WHERE v.refkey = m.mld_melding_key -- Dagelijkse losverkoopfacturatie (na vrijgave) + FROM bssc_v_addd_losverkoop v, mld_melding m + WHERE v.mld_melding_key > 18833 -- Per 01-12-2022 (18833 laatste melding op 30-11-2022)! + AND m.mld_melding_status = 5 -- Afgemeld=VRIJGEGEVEN!!! + AND v.refkey = m.mld_melding_key -- Dagelijkse losverkoopfacturatie (na vrijgave) ORDER BY v.prs_bedrijf_key, v.mld_melding_key, -- Factuur per losverkoopmelding v.sortering; @@ -3367,7 +3471,7 @@ BEGIN FROM mld_vrije_dagen WHERE TRUNC (mld_vrije_dagen_datum) = TRUNC (SYSDATE - 1); - IF 1 = 1 -- Vrijgegeven is die nacht factureren! + IF 1 = 0 -- Vrijgegeven is die nacht factureren! THEN v_fact_count := 0; v_amount_sum := 0; @@ -3534,7 +3638,7 @@ BEGIN 2, -- Prioriteit TRUNC (SYSDATE) + (7 / 24), 'finance.smartservices@brightlands.com', - '/../../Fplace_A/CUST/BSSC/export/PDF/Backup/' || rec.fin_verkoopfactuurkop_id || '.pdf'); -- TODO + '/../../Fplace5i/CUST/BSSC/export/PDF/Backup/' || rec.fin_verkoopfactuurkop_id || '.pdf'); EXCEPTION WHEN OTHERS THEN @@ -3641,7 +3745,7 @@ BEGIN -- LET OP: ADDD-export correctie- én losverkoopfacturen (= boekingsgangen) -- draait dagelijks na middernacht (begin van dag) en de verkoop wordt ook -- elke nacht doorgezet (mits vrijgegeven!). - IF 1 = 1 + IF 1 = 0 THEN v_fact_count := 0; v_amount_sum := 0; @@ -3793,10 +3897,11 @@ BEGIN -- Overgang van Geaccepteerd naar Verwerkt niet mogelijk, dus dan -- eerst afmelden (als nog niet Afgemeld)! - IF (rec.mld_melding_status = 4) -- ACP - THEN - MLD.setmeldingstatus (rec.mld_melding_key, 5, NULL); -- AFM - END IF; + --IF (rec.mld_melding_status = 4) -- ACP + --THEN + -- MLD.setmeldingstatus (rec.mld_melding_key, 5, NULL); -- AFM + --END IF; + -- Melding hier altijd Afgemeld! MLD.setmeldingstatus (rec.mld_melding_key, 6, NULL); -- VER COMMIT; EXCEPTION @@ -3962,10 +4067,11 @@ BEGIN -- Overgang van Geaccepteerd naar Verwerkt niet mogelijk, dus dan -- eerst afmelden (als nog niet Afgemeld)! - IF (rec.mld_melding_status = 4) -- ACP - THEN - MLD.setmeldingstatus (rec.mld_melding_key, 5, NULL); -- AFM - END IF; + --IF (rec.mld_melding_status = 4) -- ACP + --THEN + -- MLD.setmeldingstatus (rec.mld_melding_key, 5, NULL); -- AFM + --END IF; + -- Melding hier altijd Afgemeld! MLD.setmeldingstatus (rec.mld_melding_key, 6, NULL); -- VER COMMIT; EXCEPTION @@ -4007,7 +4113,7 @@ BEGIN 2, -- Prioriteit TRUNC (SYSDATE) + (7 / 24), 'finance.smartservices@brightlands.com', - '/../../Fplace_A/CUST/BSSC/export/PDF/Backup/' || rec.fin_verkoopfactuurkop_id || '.pdf'); -- TODO + '/../../Fplace5i/CUST/BSSC/export/PDF/Backup/' || rec.fin_verkoopfactuurkop_id || '.pdf'); EXCEPTION WHEN OTHERS THEN @@ -5238,7 +5344,8 @@ AS -- WHERE fac_srtnotificatie_key = 82 -- RESUPD -- AND INSTR (UPPER (fac_tracking_oms), 'VRIJGEGEVEN TER FACTURATIE DOOR') > 0) t, res_status_bo rs - WHERE v.xmlnode = 'reservering' + WHERE 1 = 0 -- TODO:Nog geen facturatie van reserveringen uit Facilitor! + AND v.xmlnode = 'reservering' AND v.refkey = rrr.res_rsv_ruimte_key AND rrr.res_rsv_ruimte_key = kw.res_rsv_ruimte_key(+) --AND kw.res_rsv_ruimte_key = t.fac_tracking_refkey(+) @@ -5252,11 +5359,11 @@ AS TO_CHAR (v.mld_melding_key) refid, v.regel_oms refoms, ms.mld_statuses_omschrijving status, - fac.gettrackingdate ('MLDAFM', v.mld_melding_key) datum, + fac.gettrackingdate ('MLDACP', v.mld_melding_key) datum, v.mndnet, - fac.gettrackinguserkey ('MLDAFR', v.mld_melding_key) vrijgever -- Vrijgever is de MLDAFR-user + fac.gettrackinguserkey ('MLDAFM', v.mld_melding_key) vrijgever -- Vrijgever is de MLDAFM-user --TO_NUMBER (NULL) vrijgave_door, - --fac.gettrackingdate ('MLDAFR', v.mld_melding_key) vrijgave_datum + --fac.gettrackingdate ('MLDAFM', v.mld_melding_key) vrijgave_datum FROM bssc_v_addd_actual v, mld_melding m, mld_statuses ms @@ -5345,11 +5452,11 @@ AS v.contactpersoon, TO_CHAR (v.mld_melding_key) refid, v.regel_oms refoms, - fac.gettrackingdate ('MLDAFM', v.mld_melding_key) datum, + fac.gettrackingdate ('MLDACP', v.mld_melding_key) datum, v.mndnet, - fac.gettrackinguserkey ('MLDAFR', v.mld_melding_key) vrijgever -- Vrijgever is de MLDAFR-user + fac.gettrackinguserkey ('MLDAFM', v.mld_melding_key) vrijgever -- Vrijgever is de MLDAFM-user --TO_NUMBER (NULL) vrijgave_door, - --fac.gettrackingdate ('MLDAFR', v.mld_melding_key) vrijgave_datum + --fac.gettrackingdate ('MLDAFM', v.mld_melding_key) vrijgave_datum FROM bssc_v_addd_frozen v WHERE v.mld_melding_key IS NOT NULL) x, prs_v_perslid_fullnames_all pfi @@ -5483,11 +5590,11 @@ AS TO_CHAR (v.mld_melding_key) refid, v.regel_oms refoms, ms.mld_statuses_omschrijving status, - fac.gettrackingdate ('MLDAFM', v.mld_melding_key) datum, + fac.gettrackingdate ('MLDACP', v.mld_melding_key) datum, v.mndnet, - fac.gettrackinguserkey ('MLDAFR', v.mld_melding_key) vrijgever, -- Vrijgever is de MLDAFR-user + fac.gettrackinguserkey ('MLDAFM', v.mld_melding_key) vrijgever, -- Vrijgever is de MLDAFR-user TO_NUMBER (NULL) vrijgave_door, - fac.gettrackingdate ('MLDAFR', v.mld_melding_key) vrijgave_datum + fac.gettrackingdate ('MLDAFM', v.mld_melding_key) vrijgave_datum FROM bssc_v_addd_actual v, mld_melding m, mld_statuses ms @@ -5503,11 +5610,11 @@ AS TO_CHAR (v.mld_melding_key) refid, v.regel_oms refoms, 'Verwerkt' status, - fac.gettrackingdate ('MLDAFM', v.mld_melding_key) datum, + fac.gettrackingdate ('MLDACP', v.mld_melding_key) datum, v.mndnet, - fac.gettrackinguserkey ('MLDAFR', v.mld_melding_key) vrijgever, -- Vrijgever is de MLDAFR-user + fac.gettrackinguserkey ('MLDAFM', v.mld_melding_key) vrijgever, -- Vrijgever is de MLDAFM-user TO_NUMBER (NULL) vrijgave_door, - fac.gettrackingdate ('MLDAFR', v.mld_melding_key) vrijgave_datum + fac.gettrackingdate ('MLDAFM', v.mld_melding_key) vrijgave_datum FROM bssc_v_addd_frozen v WHERE v.mld_melding_key IS NOT NULL) x, prs_v_perslid_fullnames_all pfi, @@ -5851,12 +5958,7 @@ AS SELECT maand, prs_bedrijf_key, prs_debiteur_naam, refid, 0 vvo, 0 huur, 0 verv_toeslag, 0 ict, 0 facilitair, 0 service, 0 schoonmaak, 0 koffie, mndnet duty, 0 forum FROM bssc_v_fact_actual - WHERE regel_key = 983 -- Duty manager - UNION ALL - SELECT maand, prs_bedrijf_key, prs_debiteur_naam, refid, - 0 vvo, 0 huur, 0 verv_toeslag, 0 ict, 0 facilitair, 0 service, 0 schoonmaak, 0 koffie, 0 duty, mndnet forum - FROM bssc_v_fact_actual - WHERE regel_key = 985) -- Gebruik Forum + WHERE regel_key = 983) -- Duty manager GROUP BY maand, prs_bedrijf_key, prs_debiteur_naam, refid) UNION ALL SELECT maand, @@ -5952,12 +6054,7 @@ AS SELECT maand, prs_bedrijf_key, prs_debiteur_naam, fin_verkoopfactuur_id, 0 vvo, 0 huur, 0 verv_toeslag, 0 ict, 0 facilitair, 0 service, 0 schoonmaak, 0 koffie, mndnet duty, 0 forum FROM bssc_v_fact_frozen - WHERE regel_key = 983 -- Duty manager - UNION ALL - SELECT maand, prs_bedrijf_key, prs_debiteur_naam, fin_verkoopfactuur_id, - 0 vvo, 0 huur, 0 verv_toeslag, 0 ict, 0 facilitair, 0 service, 0 schoonmaak, 0 koffie, 0 duty, mndnet forum - FROM bssc_v_fact_frozen - WHERE regel_key = 985) -- Gebruik Forum + WHERE regel_key = 983) -- Duty manager GROUP BY maand, prs_bedrijf_key, prs_debiteur_naam, fin_verkoopfactuur_id); -- Rapportage van contracten die niet automatisch worden gefactureerd!