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

SORO#31387: De leaseauto rapporten

Browse Source 
svn path=/Customer/trunk/; revision=23926
This commit is contained in:
Marcel Bourseau
2015-01-22 14:09:23 +00:00
parent df35e0bd61
commit e6176f6953
1 changed files with 255 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

259
SORO/soro.sql
View File

@@ -430,9 +430,9 @@ AS SELECT 'ORO' || NVL(LPAD( TO_CHAR(MAX(TO_NUMBER(SUBSTR(ins_deel_upper, LENGT
-- Let op: harde datum-vanaf 1 januari 2015, zodat de hele oude autoritten (van voor 1 jan 2015) niet meedoen, aangezien dit vanaf 1 jan 2015 ingaat
-- Let op: de union is nodig zodat een gekozen reserveringsnummer (bij een melding) wel zichtbaar is als ref-flexprop, maar niet meer selecteerbaar bij edit/nieuw (vandaar de vervaldatum).
CREATE OR REPLACE VIEW soro_v_autorit_km
(res_rsv_ruimte_key, res_nummer, vervaldatum)
(res_rsv_ruimte_key, res_nummer, vervaldatum, mld_melding_key)
AS
select res_rsv_ruimte_key, res_reservering_key || '/' || res_rsv_ruimte_volgnr, null
select rrr.res_rsv_ruimte_key, rrr.res_reservering_key || '/' || rrr.res_rsv_ruimte_volgnr, NULL, NULL
from res_rsv_ruimte rrr
where res_activiteit_key = 30
and res_rsv_ruimte_verwijder is null
@@ -455,7 +455,7 @@ and not exists
and kd.fac_kenmerkdomein_verwijder is null
and fac.safe_to_number(km.mld_kenmerkmelding_waarde) = rrr.res_rsv_ruimte_key)
UNION
SELECT rrr.res_rsv_ruimte_key, res_reservering_key || '/' || res_rsv_ruimte_volgnr, to_date('01-01-2000','dd-mm-yyyy')
SELECT rrr.res_rsv_ruimte_key, res_reservering_key || '/' || res_rsv_ruimte_volgnr, to_date('01-01-2000','dd-mm-yyyy'), m.mld_melding_key
FROM mld_melding m, mld_kenmerkmelding km, mld_kenmerk k, mld_srtkenmerk sk, fac_kenmerkdomein kd, res_rsv_ruimte rrr
where m.mld_stdmelding_key = 181
and km.mld_melding_key = m.mld_melding_key
@@ -512,9 +512,260 @@ AS
and fac.safe_to_number(km.mld_kenmerkmelding_waarde) = rrr.res_rsv_ruimte_key);
-- 1e deel: alle ritten zonder km's
--UNION
-- 2e deel: alle ritten met km's
-- Kenmerk-keys:
-- res_srtkenmerk_key = 1 -> Naam client
-- res_srtkenmerk_key = 2 -> Kosten: Client met/zonder verblijf
-- res_srtkenmerk_key = 23 -> Van
-- res_srtkenmerk_key = 24 -> Naar
-- mld_srtkenmerk_key = 63 -> Beginstand kilometers
-- mld_srtkenmerk_key = 64 -> Eindstand kilometers
CREATE OR REPLACE VIEW soro_v_autorit_met_km_reg
(res_rsv_ruimte_key,
res_nummer,
res_rsv_ruimte_omschrijving,
res_rsv_ruimte_van,
res_rsv_ruimte_tot,
res_deel_omschrijving,
alg_locatie_code,
alg_locatie_omschrijving,
prs_perslid_naam,
prs_perslid_tussenvoegsel,
prs_perslid_voorletters,
prs_perslid_voornaam,
client,
kosten,
van,
naar,
km_start,
km_einde
)
AS
SELECT rit.res_rsv_ruimte_key,
rit.res_nummer,
rrr.res_rsv_ruimte_omschrijving,
rrr.res_rsv_ruimte_van,
rrr.res_rsv_ruimte_tot,
rd.res_deel_omschrijving,
l.alg_locatie_code,
l.alg_locatie_omschrijving,
p.prs_perslid_naam,
p.prs_perslid_tussenvoegsel,
p.prs_perslid_voorletters,
p.prs_perslid_voornaam,
(SELECT w.res_kenmerkreservering_waarde
FROM res_kenmerkwaarde w, res_kenmerk k
WHERE w.res_rsv_ruimte_key = rit.res_rsv_ruimte_key
AND w.res_kenmerk_key = k.res_kenmerk_key
AND k.res_srtkenmerk_key = 1
AND w.res_kenmerkwaarde_verwijder IS NULL) client,
(SELECT UD.FAC_USRDATA_OMSCHR
FROM res_kenmerkwaarde w, res_kenmerk k, fac_usrdata ud
WHERE ud.fac_usrdata_key = fac.safe_to_number(w.res_kenmerkreservering_waarde)
AND w.res_rsv_ruimte_key = rit.res_rsv_ruimte_key
AND w.res_kenmerk_key = k.res_kenmerk_key
AND k.res_srtkenmerk_key = 2
AND w.res_kenmerkwaarde_verwijder IS NULL) kosten,
(SELECT w.res_kenmerkreservering_waarde
FROM res_kenmerkwaarde w, res_kenmerk k
WHERE w.res_rsv_ruimte_key = rit.res_rsv_ruimte_key
AND w.res_kenmerk_key = k.res_kenmerk_key
AND k.res_srtkenmerk_key = 23
AND w.res_kenmerkwaarde_verwijder IS NULL) van,
(SELECT w.res_kenmerkreservering_waarde
FROM res_kenmerkwaarde w, res_kenmerk k
WHERE w.res_rsv_ruimte_key = rit.res_rsv_ruimte_key
AND w.res_kenmerk_key = k.res_kenmerk_key
AND k.res_srtkenmerk_key = 24
AND w.res_kenmerkwaarde_verwijder IS NULL) naar,
NULL km_start,
NULL km_einde
FROM soro_v_autorit_km rit, res_rsv_ruimte rrr, prs_perslid p, res_rsv_deel rrd, res_deel rd, ins_deel d, alg_locatie l
WHERE vervaldatum IS NULL
AND rrr.res_rsv_ruimte_key = rit.res_rsv_ruimte_key
AND p.prs_perslid_key = rrr.res_rsv_ruimte_host_key
AND rrd.res_rsv_ruimte_key = rit.res_rsv_ruimte_key
AND rrd.res_rsv_deel_verwijder IS NULL
AND rd.res_deel_key=rrd.res_deel_key
AND d.ins_deel_key = rd.res_ins_deel_key
AND l.alg_locatie_key = d.ins_alg_locatie_key
UNION
SELECT rit.res_rsv_ruimte_key,
rit.res_nummer,
rrr.res_rsv_ruimte_omschrijving,
rrr.res_rsv_ruimte_van,
rrr.res_rsv_ruimte_tot,
rd.res_deel_omschrijving,
l.alg_locatie_code,
l.alg_locatie_omschrijving,
p.prs_perslid_naam,
p.prs_perslid_tussenvoegsel,
p.prs_perslid_voorletters,
p.prs_perslid_voornaam,
(SELECT w.res_kenmerkreservering_waarde
FROM res_kenmerkwaarde w, res_kenmerk k
WHERE w.res_rsv_ruimte_key = rit.res_rsv_ruimte_key
AND w.res_kenmerk_key = k.res_kenmerk_key
AND k.res_srtkenmerk_key = 1
AND w.res_kenmerkwaarde_verwijder IS NULL) client,
(SELECT UD.FAC_USRDATA_OMSCHR
FROM res_kenmerkwaarde w, res_kenmerk k, fac_usrdata ud
WHERE ud.fac_usrdata_key = fac.safe_to_number(w.res_kenmerkreservering_waarde)
AND w.res_rsv_ruimte_key = rit.res_rsv_ruimte_key
AND w.res_kenmerk_key = k.res_kenmerk_key
AND k.res_srtkenmerk_key = 2
AND w.res_kenmerkwaarde_verwijder IS NULL) kosten,
(SELECT w.res_kenmerkreservering_waarde
FROM res_kenmerkwaarde w, res_kenmerk k
WHERE w.res_rsv_ruimte_key = rit.res_rsv_ruimte_key
AND w.res_kenmerk_key = k.res_kenmerk_key
AND k.res_srtkenmerk_key = 23
AND w.res_kenmerkwaarde_verwijder IS NULL) van,
(SELECT w.res_kenmerkreservering_waarde
FROM res_kenmerkwaarde w, res_kenmerk k
WHERE w.res_rsv_ruimte_key = rit.res_rsv_ruimte_key
AND w.res_kenmerk_key = k.res_kenmerk_key
AND k.res_srtkenmerk_key = 24
AND w.res_kenmerkwaarde_verwijder IS NULL) naar,
(SELECT km.mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding km, mld_kenmerk k
WHERE km.mld_melding_key = rit.mld_melding_key
AND km.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = 63
AND km.mld_kenmerkmelding_verwijder IS NULL) km_start,
(SELECT km.mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding km, mld_kenmerk k
WHERE km.mld_melding_key = rit.mld_melding_key
AND km.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = 64
AND km.mld_kenmerkmelding_verwijder IS NULL) km_einde
FROM soro_v_autorit_km rit, res_rsv_ruimte rrr, prs_perslid p, res_rsv_deel rrd, res_deel rd, ins_deel d, alg_locatie l
WHERE vervaldatum IS NOT NULL
AND rrr.res_rsv_ruimte_key = rit.res_rsv_ruimte_key
AND p.prs_perslid_key = rrr.res_rsv_ruimte_host_key
AND rrd.res_rsv_ruimte_key = rit.res_rsv_ruimte_key
AND rrd.res_rsv_deel_verwijder IS NULL
AND rd.res_deel_key=rrd.res_deel_key
AND d.ins_deel_key = rd.res_ins_deel_key
AND l.alg_locatie_key = d.ins_alg_locatie_key;
CREATE OR REPLACE VIEW soro_v_rap_autorit_belasting
(
fclt_f_auto,
fclt_f_jaar,
fclt_f_kwartaal,
fclt_f_maand,
datum,
omschrijving,
chauffeur,
van,
naar,
km_start,
km_eind,
km_gereden
)
AS
SELECT
res_deel_omschrijving,
to_char(res_rsv_ruimte_van,'YYYY'),
'Q' || to_char(res_rsv_ruimte_van,'Q'),
to_char(res_rsv_ruimte_van,'MM'),
to_char(res_rsv_ruimte_van,'DD-MM-YYYY'),
res_rsv_ruimte_omschrijving,
TRIM(prs_perslid_voornaam || decode (prs_perslid_tussenvoegsel, NULL, NULL, ' ' || prs_perslid_tussenvoegsel) || decode (prs_perslid_naam, NULL, NULL, ' ' || prs_perslid_naam)),
van,
naar,
km_start,
km_einde,
fac.safe_to_number(km_einde) - fac.safe_to_number(km_start) km_gereden
FROM soro_v_autorit_met_km_reg;
CREATE OR REPLACE VIEW soro_v_rap_autorit_locatie
(
fclt_f_locatie,
fclt_f_jaar,
fclt_f_kwartaal,
fclt_f_maand,
datum,
omschrijving,
chauffeur,
van,
naar,
auto,
km_start,
km_eind,
km_gereden,
kosten
)
AS
SELECT
alg_locatie_code || alg_locatie_omschrijving,
to_char(res_rsv_ruimte_van,'YYYY'),
'Q' || to_char(res_rsv_ruimte_van,'Q'),
to_char(res_rsv_ruimte_van,'MM'),
to_char(res_rsv_ruimte_van,'DD-MM-YYYY'),
res_rsv_ruimte_omschrijving,
TRIM(prs_perslid_voornaam || decode (prs_perslid_tussenvoegsel, NULL, NULL, ' ' || prs_perslid_tussenvoegsel) || decode (prs_perslid_naam, NULL, NULL, ' ' || prs_perslid_naam)),
van,
naar,
res_deel_omschrijving,
km_start,
km_einde,
fac.safe_to_number(km_einde) - fac.safe_to_number(km_start) km_gereden,
0.29 * (fac.safe_to_number(km_einde) - fac.safe_to_number(km_start)) kosten
FROM soro_v_autorit_met_km_reg
WHERE UPPER(kosten) LIKE '%LOCATIE%';
CREATE OR REPLACE VIEW soro_v_rap_autorit_client
(
fclt_f_client,
fclt_f_verblijf_behandeling,
fclt_f_jaar,
fclt_f_kwartaal,
fclt_f_maand,
datum,
omschrijving,
chauffeur,
van,
naar,
auto,
km_start,
km_eind,
km_gereden,
kosten
)
AS
SELECT
client,
kosten,
to_char(res_rsv_ruimte_van,'YYYY'),
'Q' || to_char(res_rsv_ruimte_van,'Q'),
to_char(res_rsv_ruimte_van,'MM'),
to_char(res_rsv_ruimte_van,'DD-MM-YYYY'),
res_rsv_ruimte_omschrijving,
TRIM(prs_perslid_voornaam || decode (prs_perslid_tussenvoegsel, NULL, NULL, ' ' || prs_perslid_tussenvoegsel) || decode (prs_perslid_naam, NULL, NULL, ' ' || prs_perslid_naam)),
van,
naar,
res_deel_omschrijving,
km_start,
km_einde,
fac.safe_to_number(km_einde) - fac.safe_to_number(km_start) km_gereden,
0.29 * (fac.safe_to_number(km_einde) - fac.safe_to_number(km_start)) kosten
FROM soro_v_autorit_met_km_reg
WHERE UPPER(kosten) LIKE '%CLI<4C>NT%';
BEGIN fac.registercustversion('SORO', 4); END;
BEGIN fac.registercustversion('SORO', 5); END;
/
BEGIN adm.systrackscriptId('$Id$', 0); END;