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

LPNL#73921 -- Realisatie informatiezuil met bezoekers via LeftQlick

Browse Source 
svn path=/Customer/trunk/; revision=57364
This commit is contained in:
Arthur Egberink
2022-09-21 12:51:19 +00:00
parent 31993a9cd6
commit b3022142c7
1 changed files with 79 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

84
LPNL/LPNL.sql
View File

@@ -162,6 +162,9 @@ AS
WHERE res_rsv_ruimte_key = rec.res_rsv_ruimte_key;
END LOOP;
-- Bezoekers worden na 30 dagen geanonimiseerd.
ANO.anonymizebez (SYSDATE -2000, SYSDATE - 30);
fac.writelog ('LPNL.anonimize',
'I',
'LPNL.anonimize is uitgevoerd',
@@ -173,12 +176,12 @@ AS
v_kenmerkwaarde BEZ_KENMERKWAARDE.BEZ_KENMERKWAARDE_WAARDE%TYPE;
BEGIN
v_kenmerkwaarde := FLX.getflex('BEZ', 1000, p_bezkey);
v_kenmerkwaarde := FLX.getflex('BEZ', 1020, p_bezkey);
IF v_kenmerkwaarde IS NULL
THEN
v_kenmerkwaarde := dbms_random.string('a', 15);
FLX.setflex ('BEZ',
1000,
1020,
p_bezkey,
v_kenmerkwaarde);
END IF;
@@ -689,8 +692,8 @@ AS
AND g.prs_kostenplaats_key = k.prs_kostenplaats_key(+)
AND o.mld_statusopdr_key = so.mld_statusopdr_key
AND f.fin_factuur_statuses_key = sf.fin_factuur_statuses_key(+)
UNION ALL
SELECT 'C' || c.cnt_contract_key,
UNION ALL -- Contracten die verdeeld worden over de scope
SELECT 'C' || c.cnt_contract_key,
alg_locatie_omschrijving,
prs_kostenplaats_omschrijving,
k.prs_kostenplaats_nr,
@@ -735,6 +738,57 @@ AS
AND TO_DATE (cnt_factuurschema_boekmaand, 'yyyy-mm') BETWEEN TRUNC (SYSDATE, 'y') - 365
AND TRUNC (SYSDATE, 'y') + (2*364)
AND cfs.cnt_factuurschema_boekmaand = f.fin_factuur_boekmaand(+)
AND COALESCE (FLX.getflex('FIN', 21, COALESCE(f.fin_factuur_key, -1)), '0') = '0'
UNION ALL -- Facturen op contracten die aan een locatie worden toegekend.
SELECT 'C' || c.cnt_contract_key,
alg_locatie_omschrijving,
prs_kostenplaats_omschrijving,
k.prs_kostenplaats_nr,
prs_kostensoort_oms,
prs_kostensoort_opmerking,
prs_bedrijf_naam,
cnt_contract_omschrijving
|| ' ('
|| cnt_factuurschema_boekmaand
|| ')',
NULL,
cfs.cnt_factuurschema_bedrag * (COALESCE(cp.cnt_contract_plaats_gewicht, cnt_contract_kosten) / DECODE(cnt_contract_kosten, NULL, 1, 0, 1, cnt_contract_kosten)),
sf.fin_factuur_statuses_omschr,
f.fin_factuur_totaal,
f.fin_factuur_datum,
f.fin_factuur_nr,
TO_DATE (cnt_factuurschema_boekmaand, 'yyyy-mm'),
'Kosten' typeverpl
FROM lpnl_v_aanwezigfactuur f,
cnt_contract c,
cnt_contract_plaats cp,
fin_factuurregel fr,
prs_kostensoort ks,
prs_bedrijf b,
prs_kostenplaats k,
alg_locatie l,
alg_gebouw g,
fin_factuur_statuses sf,
cnt_factuurschema cfs,
cnt_discipline d
WHERE c.cnt_contract_key = f.cnt_contract_key(+)
AND f.fin_factuur_key = fr.fin_factuur_key(+)
AND c.ins_discipline_key = d.ins_discipline_key
AND d.ins_discipline_key <> 461 -- Voorzieningen
AND c.cnt_contract_verwijder IS NULL
AND c.cnt_contract_key = cp.cnt_contract_key
AND cp.cnt_alg_plaats_key = l.alg_locatie_key
AND fr.fin_factuurregel_referentie = l.alg_locatie_code
AND l.alg_locatie_key = g.alg_locatie_key
AND g.prs_kostenplaats_key = k.prs_kostenplaats_key
AND c.prs_kostensoort_key = COALESCE(ks.prs_kostensoort_key, d.prs_kostensoort_key)
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
AND f.fin_factuur_statuses_key = sf.fin_factuur_statuses_key(+)
AND c.cnt_contract_key = cfs.cnt_contract_key
AND TO_DATE (cnt_factuurschema_boekmaand, 'yyyy-mm') BETWEEN TRUNC (SYSDATE, 'y') - 365
AND TRUNC (SYSDATE, 'y') + (2*364)
AND cfs.cnt_factuurschema_boekmaand = f.fin_factuur_boekmaand(+)
AND COALESCE (FLX.getflex('FIN', 21, COALESCE(f.fin_factuur_key,-1)), '0') = '1'
UNION ALL -- Voorzieningen cnt_discipline_key = 461
SELECT 'C' || c.cnt_contract_key,
NULL alg_locatie_omschrijving,
@@ -786,13 +840,33 @@ AS
AND cnt_contract_plaats_verwijder IS NULL
AND c.cnt_contract_key = cp.cnt_contract_key;
-- Portal rapport om mensen met een dagpas te tonen.
CREATE OR REPLACE VIEW lpnl_v_rap_dagpas_vandaag
AS
SELECT a.bez_afspraak_key,
a.bez_afspraak_datum,
l.alg_locatie_omschrijving,
b.bez_afspraak_bedrijf,
b.bez_afspraak_naam,
pf.prs_perslid_naam_full
FROM bez_bezoekers b,
bez_afspraak a,
prs_v_perslid_fullnames pf,
alg_locatie l
WHERE a.bez_afspraak_key = b.bez_afspraak_key
AND FLX.getflex ('BEZ', 1000, b.bez_bezoekers_key) = 1
AND a.alg_locatie_key = l.alg_locatie_key
AND a.bez_afspraak_host_key = pf.prs_perslid_key
AND TRUNC(bez_afspraak_datum) = TRUNC(SYSDATE);
-- view voor de informatiezuil om informatie van bezoekers via de api op te vragen
CREATE OR REPLACE VIEW lpnl_v_qr_visitor
AS
SELECT pf.prs_perslid_naam_friendly naam,
b.bez_afspraak_naam bezoeker,
b.bez_afspraak_bedrijf bedrijf,
a.bez_afspraak_datum datumtijd,
a.bez_afspraak_datum datumtijd_begin,
a.bez_afspraak_eind datumtijd_eind,
FLX.getflex ('BEZ', 1020, b.bez_bezoekers_key) qr,
b.bez_bezoekers_key key
FROM bez_bezoekers b, bez_afspraak a, prs_v_perslid_fullnames pf