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

SORO#31737: Autoritten administratie zonder reservering

Browse Source 
svn path=/Customer/trunk/; revision=29649
This commit is contained in:
Marcel Bourseau
2016-06-07 09:27:01 +00:00
parent d0395027aa
commit cc455e6db6
1 changed files with 149 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

151
SORO/soro.sql
View File

@@ -698,6 +698,115 @@ UNION
AND l.alg_locatie_key = d.ins_alg_locatie_key;
-- Kenmerk-keys:
-- mld_srtkenmerk_key = 85 -> Naam client
-- mld_srtkenmerk_key = 84 -> Kosten: Client met/zonder verblijf
-- mld_srtkenmerk_key = 87 -> Reden van de rit
-- mld_srtkenmerk_key = 88 -> Van
-- mld_srtkenmerk_key = 86 -> Naar
-- mld_srtkenmerk_key = 83 -> Datum van de rit
-- mld_srtkenmerk_key = 63 -> Beginstand kilometers
-- mld_srtkenmerk_key = 64 -> Eindstand kilometers
-- mld_std_melding_key = 221 -> Prive rit registratie
-- Kilometers gereden met prive auto, dus de ritten ZONDER autoRESERVERING, maar gewoon met je eigen prive-bak
-- Dit zijn de gegevens(records) waar een melding is gemaakt van standaard melding key 221
CREATE OR REPLACE VIEW soro_v_prive_autorit_met_km
(mld_melding_key,
mld_nummer,
mld_melding_omschrijving,
datum_van,
datum_tot,
auto_omschrijving,
alg_locatie_code,
alg_locatie_omschrijving,
prs_perslid_naam,
prs_perslid_tussenvoegsel,
prs_perslid_voorletters,
prs_perslid_voornaam,
client,
kosten,
reden_vervoer,
van,
naar,
km_start,
km_einde
)
AS
SELECT m.mld_melding_key,
m.mld_melding_key,
m.mld_melding_omschrijving,
(SELECT to_date(km.mld_kenmerkmelding_waarde,'dd-mm-yyyy')
FROM mld_kenmerkmelding km, mld_kenmerk k
WHERE km.mld_melding_key = m.mld_melding_key
AND km.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = 83
AND km.mld_kenmerkmelding_verwijder IS NULL) datum_van,
(SELECT to_date(km.mld_kenmerkmelding_waarde,'dd-mm-yyyy')
FROM mld_kenmerkmelding km, mld_kenmerk k
WHERE km.mld_melding_key = m.mld_melding_key
AND km.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = 83
AND km.mld_kenmerkmelding_verwijder IS NULL) datum_tot,
'Eigen auto',
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 km.mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding km, mld_kenmerk k
WHERE km.mld_melding_key = m.mld_melding_key
AND km.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = 85
AND km.mld_kenmerkmelding_verwijder IS NULL) client,
(SELECT UD.FAC_USRDATA_OMSCHR
FROM mld_kenmerkmelding km, mld_kenmerk k, fac_usrdata ud
WHERE ud.fac_usrdata_key = fac.safe_to_number(km.mld_kenmerkmelding_waarde)
AND km.mld_melding_key = m.mld_melding_key
AND km.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = 84
AND km.mld_kenmerkmelding_verwijder IS NULL) kosten,
(SELECT UD.FAC_USRDATA_OMSCHR
FROM mld_kenmerkmelding km, mld_kenmerk k, fac_usrdata ud
WHERE ud.fac_usrdata_key = fac.safe_to_number(km.mld_kenmerkmelding_waarde)
AND km.mld_melding_key = m.mld_melding_key
AND km.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = 87
AND km.mld_kenmerkmelding_verwijder IS NULL) reden_vervoer,
(SELECT km.mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding km, mld_kenmerk k
WHERE km.mld_melding_key = m.mld_melding_key
AND km.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = 88
AND km.mld_kenmerkmelding_verwijder IS NULL) van,
(SELECT km.mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding km, mld_kenmerk k
WHERE km.mld_melding_key = m.mld_melding_key
AND km.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = 86
AND km.mld_kenmerkmelding_verwijder IS NULL) naar,
(SELECT km.mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding km, mld_kenmerk k
WHERE km.mld_melding_key = m.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 = m.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 mld_melding m, prs_perslid p, alg_locatie l
WHERE m.mld_stdmelding_key = 221
AND p.prs_perslid_key = m.prs_perslid_key_voor
AND l.alg_locatie_key = m.mld_alg_locatie_key;
CREATE OR REPLACE VIEW soro_v_rap_autorit_belasting
(
fclt_f_auto,
@@ -766,6 +875,24 @@ SELECT
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%'
UNION ALL
SELECT
alg_locatie_code || alg_locatie_omschrijving,
to_char(datum_van,'YYYY'),
'Q' || to_char(datum_van,'Q'),
to_char(datum_van,'MM'),
to_char(datum_van,'DD-MM-YYYY'),
mld_melding_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,
auto_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_prive_autorit_met_km
WHERE UPPER(kosten) LIKE '%LOCATIE%';
@@ -811,11 +938,31 @@ WHERE UPPER(kosten) LIKE '%CLI
AND w.res_rsv_ruimte_key = a.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;
AND w.res_kenmerkwaarde_verwijder IS NULL
UNION ALL
SELECT
client,
kosten,
reden_vervoer,
to_char(datum_van,'YYYY'),
'Q' || to_char(datum_van,'Q'),
to_char(datum_van,'MM'),
to_char(datum_van,'DD-MM-YYYY'),
mld_melding_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,
auto_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_prive_autorit_met_km
WHERE UPPER(kosten) LIKE '%CLI<4C>NT%';
BEGIN fac.registercustversion('SORO', 6); END;
BEGIN fac.registercustversion('SORO', 8); END;
/
BEGIN adm.systrackscriptId('$Id$', 0); END;