Merge DB20 patches

svn path=/Customer/trunk/; revision=21080
This commit is contained in:
Jos Groot Lipman
2014-03-20 18:13:02 +00:00
parent 2a20a0d64f
commit 328fa0daca
4 changed files with 316 additions and 230 deletions

35
WTCA/Once/WTCA27.sql Normal file
View File

@@ -0,0 +1,35 @@
-- Customer specific once-script WTCA27.
--
-- (c) 2014 SG|facilitor bv
--
-- Support: +31 53 4800700
SET ECHO ON
SPOOL xWTCA27.lst
SET DEFINE OFF
-- WTCA#29051: 62=WEB_PRSSYS -> Alleen Marc/Christina?
CREATE OR REPLACE VIEW wtca_v_rap_maand_frozen_fact AS SELECT NULL x FROM DUAL;
INSERT INTO FAC_USRRAP
(fac_usrrap_omschrijving, fac_usrrap_view_name,
fac_usrrap_in_huidige_locatie,
fac_usrrap_template, fac_usrrap_macro,
fac_usrrap_vraagbegindatum, fac_usrrap_vraageinddatum,
fac_usrrap_functie,
fac_usrrap_info,
fac_functie_key, fac_usrrap_autorefresh
)
VALUES ('Factuurvoorstel (definitief)', 'wtca_v_rap_maand_frozen_fact',
NULL,
NULL, NULL,
0, 0,
1,
'Definitief periodeoverzicht gegroepeerd per complex.',
62,
0
);
COMMIT;
BEGIN adm.systrackscriptId('$Id$'); END;
/
SPOOL OFF
@wtca.sql

View File

@@ -2306,7 +2306,7 @@ AS
fclt_3d_afdeling_key
FROM wtca_v_rap_maand_actual;
/* Formatted on 5-5-2011 14:02:24 (QP5 v5.115.810.9015) */
/* Formatted on 13-3-2014 18:05:55 (QP5 v5.136.908.31019) */
CREATE OR REPLACE VIEW wtca_v_rap_maand_frozen
(
fclt_f_archief,
@@ -2316,6 +2316,7 @@ CREATE OR REPLACE VIEW wtca_v_rap_maand_frozen
fclt_f_kdrager,
fclt_f_kdrager_oms,
corr_kdrager,
hide_f_maatschap_key,
fclt_f_maatschap,
fclt_f_ksoort,
fclt_f_ksoort_oms,
@@ -2336,225 +2337,250 @@ CREATE OR REPLACE VIEW wtca_v_rap_maand_frozen
fclt_3d_afdeling_key
)
AS
SELECT a.datum_frozen,
COALESCE (c2.sla, a.sla),
COALESCE (c2.prefix, a.prefix),
a.opdracht,
a.kdrager,
a.kdrager_oms,
c1.corr_kdrager,
COALESCE (d.geb_maatschap, e.ter_maatschap),
COALESCE (c2.corr_ksoort, a.ksoort),
COALESCE (c2.corr_ksoort_oms, a.ksoort_oms),
DECODE (c2.corr_ksoort,
NULL, NULL,
a.ksoort || '-' || a.ksoort_oms),
DECODE (f.kdeel,
63, a.gebouw_terrein || ' (H)', -- Toevoeging (H)
37, a.gebouw_terrein || ' (I)', -- Toevoeging (I)
a.gebouw_terrein),
a.verdieping,
a.ruimte,
COALESCE (c2.vakgroep, a.vakgroep),
COALESCE (c2.melding, a.melding),
a.oms,
a.opm,
a.datum_aanmaak,
a.datum_gepland,
a.datum_gereed,
a.bedrijf,
a.cp,
DECODE (f.kdeel,
NULL, a.kosten,
ROUND ( (f.kdeel * a.kosten) / 100, 2)),
b.afdeling
FROM (SELECT o.mld_opdr_key,
COALESCE (og.alg_gebouw_key,
og.alg_terreinsector_key)
gebter_key,
TO_CHAR (
fac.gettrackingdate (
'ORDVER',
o.mld_opdr_key
),
'yyyy-mm-dd'
)
datum_frozen,
TO_CHAR (m.mld_melding_uitvoertijd)
sla,
sd.ins_srtdiscipline_prefix prefix,
o.mld_melding_key
|| '/'
|| o.mld_opdr_bedrijfopdr_volgnr
opdracht,
kp.prs_kostenplaats_nr kdrager,
kp.prs_kostenplaats_omschrijving
kdrager_oms,
COALESCE (ksm.prs_kostensoort_oms,
ksv.prs_kostensoort_oms)
ksoort,
DECODE (
ksm.prs_kostensoort_oms,
NULL,
ksv.prs_kostensoort_opmerking,
ksm.prs_kostensoort_opmerking
)
ksoort_oms,
COALESCE (og.alg_terreinsector_code,
og.alg_gebouw_code)
gebouw_terrein,
og.alg_verdieping_code verdieping,
og.alg_ruimte_nr ruimte,
td.ins_discipline_omschrijving
vakgroep,
sm.mld_stdmelding_omschrijving
melding,
o.mld_opdr_omschrijving oms,
o.mld_opdr_opmerking opm,
TO_CHAR (o.mld_opdr_datumbegin,
'dd-mm-yyyy')
datum_aanmaak, -- Of verzonden?
TO_CHAR (
fac.datumtijdplusuitvoertijd (
o.mld_opdr_datumbegin,
m.mld_melding_uitvoertijd,
'DAGEN'
),
'dd-mm-yyyy'
)
datum_gepland,
TO_CHAR (
fac.gettrackingdate (
'ORDAFM',
o.mld_opdr_key
),
'dd-mm-yyyy'
)
datum_gereed,
b.prs_bedrijf_naam bedrijf,
o.mld_opdr_contactpersoon cp,
o.mld_opdr_kosten kosten
FROM mld_opdr o,
prs_bedrijf b,
mld_melding m,
alg_v_allonrgoed_gegevens og,
mld_stdmelding sm,
ins_tab_discipline td,
ins_srtdiscipline sd,
prs_kostensoort ksm,
prs_kostensoort ksv,
prs_kostenplaats kp
WHERE o.mld_statusopdr_key = 7
AND o.mld_uitvoerende_keys =
b.prs_bedrijf_key
AND o.mld_melding_key =
m.mld_melding_key
AND m.mld_alg_onroerendgoed_keys =
og.alg_onroerendgoed_keys
AND m.mld_stdmelding_key =
sm.mld_stdmelding_key
AND sm.mld_ins_discipline_key =
td.ins_discipline_key
AND td.ins_srtdiscipline_key =
sd.ins_srtdiscipline_key
AND sm.prs_kostensoort_key =
ksm.prs_kostensoort_key(+)
AND td.prs_kostensoort_key =
ksv.prs_kostensoort_key(+)
AND o.prs_kostenplaats_key =
kp.prs_kostenplaats_key
AND kp.prs_kostenplaats_upper = 'WTC')
a
LEFT JOIN
(SELECT DISTINCT
o.mld_opdr_key,
p.prs_afdeling_key afdeling
FROM mld_opdr o,
prs_bedrijf b,
prs_contactpersoon cp,
prs_perslid p
WHERE b.prs_bedrijf_key =
cp.prs_bedrijf_key
AND o.mld_uitvoerende_keys =
b.prs_bedrijf_key
AND cp.prs_perslid_key =
p.prs_perslid_key) b
ON a.mld_opdr_key = b.mld_opdr_key
LEFT JOIN
(SELECT ko.mld_opdr_key,
ud.fac_usrdata_omschr corr_kdrager
FROM mld_kenmerkopdr ko, fac_usrdata ud
WHERE ko.mld_kenmerk_key = 1 -- Corr. kdrager
AND ud.fac_usrdata_key =
fac.safe_to_number (
ko.mld_kenmerkopdr_waarde
)) c1
ON a.mld_opdr_key = c1.mld_opdr_key
LEFT JOIN
(SELECT ko.mld_opdr_key,
TO_CHAR (sm.mld_stdmelding_uitvoertijd) sla,
COALESCE (ksm.prs_kostensoort_oms,
ksv.prs_kostensoort_oms)
corr_ksoort,
DECODE (ksm.prs_kostensoort_oms,
NULL,
ksv.prs_kostensoort_opmerking,
ksm.prs_kostensoort_opmerking)
corr_ksoort_oms,
sd.ins_srtdiscipline_prefix prefix,
td.ins_discipline_omschrijving vakgroep,
sm.mld_stdmelding_omschrijving melding
FROM mld_v_aanwezigkenmerkopdr ko,
mld_stdmelding sm,
ins_tab_discipline td,
ins_srtdiscipline sd,
prs_kostensoort ksm,
prs_kostensoort ksv
WHERE ko.mld_kenmerk_key = 41 -- Corr. melding
AND sm.mld_stdmelding_key =
fac.safe_to_number (
ko.mld_kenmerkopdr_waarde
)
AND sm.prs_kostensoort_key =
ksm.prs_kostensoort_key(+)
AND sm.mld_ins_discipline_key =
td.ins_discipline_key
AND td.prs_kostensoort_key =
ksv.prs_kostensoort_key(+)
AND td.ins_srtdiscipline_key =
sd.ins_srtdiscipline_key) c2
ON a.mld_opdr_key = c2.mld_opdr_key
LEFT JOIN
(SELECT ok.alg_onrgoed_key,
ud.fac_usrdata_omschr geb_maatschap
FROM alg_v_aanwezigonrgoedkenmerk ok,
fac_v_aanwezigusrdata ud
WHERE ok.alg_kenmerk_key = 1020 -- Maatschap
AND ud.fac_usrdata_key =
fac.safe_to_number (
ok.alg_onrgoedkenmerk_waarde
)) d
ON a.gebter_key = d.alg_onrgoed_key
LEFT JOIN
(SELECT ok.alg_onrgoed_key,
ud.fac_usrdata_omschr ter_maatschap
FROM alg_v_aanwezigonrgoedkenmerk ok,
fac_v_aanwezigusrdata ud
WHERE ok.alg_kenmerk_key = 1040 -- Maatschap
SELECT a.datum_frozen,
COALESCE (c2.sla, a.sla),
COALESCE (c2.prefix, a.prefix),
a.opdracht,
a.kdrager,
a.kdrager_oms,
c1.corr_kdrager,
COALESCE (d.geb_maatschap_key, e.ter_maatschap_key),
COALESCE (d.geb_maatschap, e.ter_maatschap),
COALESCE (c2.corr_ksoort, a.ksoort),
COALESCE (c2.corr_ksoort_oms, a.ksoort_oms),
DECODE (c2.corr_ksoort,
NULL, NULL,
a.ksoort || '-' || a.ksoort_oms),
DECODE (f.kdeel,
63, a.gebouw_terrein || ' (H)', -- Toevoeging (H)
37, a.gebouw_terrein || ' (I)', -- Toevoeging (I)
a.gebouw_terrein),
a.verdieping,
a.ruimte,
COALESCE (c2.vakgroep, a.vakgroep),
COALESCE (c2.melding, a.melding),
a.oms,
a.opm,
a.datum_aanmaak,
a.datum_gepland,
a.datum_gereed,
a.bedrijf,
a.cp,
DECODE (f.kdeel,
NULL, a.kosten,
ROUND ( (f.kdeel * a.kosten) / 100, 2)),
b.afdeling
FROM (SELECT o.mld_opdr_key,
COALESCE (og.alg_gebouw_key, og.alg_terreinsector_key)
gebter_key,
TO_CHAR (fac.gettrackingdate ('ORDVER', o.mld_opdr_key),
'yyyy-mm-dd')
datum_frozen,
TO_CHAR (m.mld_melding_uitvoertijd) sla,
sd.ins_srtdiscipline_prefix prefix,
o.mld_melding_key || '/' || o.mld_opdr_bedrijfopdr_volgnr
opdracht,
kp.prs_kostenplaats_nr kdrager,
kp.prs_kostenplaats_omschrijving kdrager_oms,
COALESCE (ksm.prs_kostensoort_oms, ksv.prs_kostensoort_oms)
ksoort,
DECODE (ksm.prs_kostensoort_oms,
NULL, ksv.prs_kostensoort_opmerking,
ksm.prs_kostensoort_opmerking)
ksoort_oms,
COALESCE (og.alg_terreinsector_code, og.alg_gebouw_code)
gebouw_terrein,
og.alg_verdieping_code verdieping,
og.alg_ruimte_nr ruimte,
td.ins_discipline_omschrijving vakgroep,
sm.mld_stdmelding_omschrijving melding,
o.mld_opdr_omschrijving oms,
o.mld_opdr_opmerking opm,
TO_CHAR (o.mld_opdr_datumbegin, 'dd-mm-yyyy') datum_aanmaak, -- Of verzonden?
TO_CHAR (
fac.datumtijdplusuitvoertijd (o.mld_opdr_datumbegin,
m.mld_melding_uitvoertijd,
'DAGEN'),
'dd-mm-yyyy')
datum_gepland,
TO_CHAR (fac.gettrackingdate ('ORDAFM', o.mld_opdr_key),
'dd-mm-yyyy')
datum_gereed,
b.prs_bedrijf_naam bedrijf,
o.mld_opdr_contactpersoon cp,
o.mld_opdr_kosten kosten
FROM mld_opdr o,
prs_bedrijf b,
mld_melding m,
alg_v_allonrgoed_gegevens og,
mld_stdmelding sm,
ins_tab_discipline td,
ins_srtdiscipline sd,
prs_kostensoort ksm,
prs_kostensoort ksv,
prs_kostenplaats kp
WHERE o.mld_statusopdr_key = 7
AND o.mld_uitvoerende_keys = b.prs_bedrijf_key
AND o.mld_melding_key = m.mld_melding_key
AND m.mld_alg_onroerendgoed_keys =
og.alg_onroerendgoed_keys
AND m.mld_stdmelding_key = sm.mld_stdmelding_key
AND sm.mld_ins_discipline_key = td.ins_discipline_key
AND td.ins_srtdiscipline_key = sd.ins_srtdiscipline_key
AND sm.prs_kostensoort_key = ksm.prs_kostensoort_key(+)
AND td.prs_kostensoort_key = ksv.prs_kostensoort_key(+)
AND o.prs_kostenplaats_key = kp.prs_kostenplaats_key
AND kp.prs_kostenplaats_upper = 'WTC') a
LEFT JOIN (SELECT DISTINCT
o.mld_opdr_key, p.prs_afdeling_key afdeling
FROM mld_opdr o,
prs_bedrijf b,
prs_contactpersoon cp,
prs_perslid p
WHERE b.prs_bedrijf_key = cp.prs_bedrijf_key
AND o.mld_uitvoerende_keys = b.prs_bedrijf_key
AND cp.prs_perslid_key = p.prs_perslid_key) b
ON a.mld_opdr_key = b.mld_opdr_key
LEFT JOIN (SELECT ko.mld_opdr_key,
ud.fac_usrdata_omschr corr_kdrager
FROM mld_kenmerkopdr ko, fac_usrdata ud
WHERE ko.mld_kenmerk_key = 1 -- Corr. kdrager
AND ud.fac_usrdata_key =
fac.safe_to_number (
ok.alg_onrgoedkenmerk_waarde
)) e
ON a.gebter_key = e.alg_onrgoed_key
LEFT JOIN
(SELECT g.alg_gebouw_key, 63 kdeel -- 63% van A-HI (=1572) op TH
FROM alg_gebouw g
WHERE g.alg_gebouw_key = 1572
UNION ALL
SELECT g.alg_gebouw_key, 37 kdeel -- 37% van A-HI (=1572) op TI
FROM alg_gebouw g
WHERE g.alg_gebouw_key = 1572) f
ON a.gebter_key = f.alg_gebouw_key;
ko.mld_kenmerkopdr_waarde)) c1
ON a.mld_opdr_key = c1.mld_opdr_key
LEFT JOIN (SELECT ko.mld_opdr_key,
TO_CHAR (sm.mld_stdmelding_uitvoertijd) sla,
COALESCE (ksm.prs_kostensoort_oms,
ksv.prs_kostensoort_oms)
corr_ksoort,
DECODE (ksm.prs_kostensoort_oms,
NULL, ksv.prs_kostensoort_opmerking,
ksm.prs_kostensoort_opmerking)
corr_ksoort_oms,
sd.ins_srtdiscipline_prefix prefix,
td.ins_discipline_omschrijving vakgroep,
sm.mld_stdmelding_omschrijving melding
FROM mld_v_aanwezigkenmerkopdr ko,
mld_stdmelding sm,
ins_tab_discipline td,
ins_srtdiscipline sd,
prs_kostensoort ksm,
prs_kostensoort ksv
WHERE ko.mld_kenmerk_key = 41 -- Corr. melding
AND sm.mld_stdmelding_key =
fac.safe_to_number (
ko.mld_kenmerkopdr_waarde)
AND sm.prs_kostensoort_key =
ksm.prs_kostensoort_key(+)
AND sm.mld_ins_discipline_key =
td.ins_discipline_key
AND td.prs_kostensoort_key =
ksv.prs_kostensoort_key(+)
AND td.ins_srtdiscipline_key =
sd.ins_srtdiscipline_key) c2
ON a.mld_opdr_key = c2.mld_opdr_key
LEFT JOIN (SELECT ok.alg_onrgoed_key,
ud.fac_usrdata_key geb_maatschap_key,
ud.fac_usrdata_omschr geb_maatschap
FROM alg_v_aanwezigonrgoedkenmerk ok,
fac_v_aanwezigusrdata ud
WHERE ok.alg_kenmerk_key = 1020 -- Maatschap
AND ud.fac_usrdata_key =
fac.safe_to_number (
ok.alg_onrgoedkenmerk_waarde)) d
ON a.gebter_key = d.alg_onrgoed_key
LEFT JOIN (SELECT ok.alg_onrgoed_key,
ud.fac_usrdata_key ter_maatschap_key,
ud.fac_usrdata_omschr ter_maatschap
FROM alg_v_aanwezigonrgoedkenmerk ok,
fac_v_aanwezigusrdata ud
WHERE ok.alg_kenmerk_key = 1040 -- Maatschap
AND ud.fac_usrdata_key =
fac.safe_to_number (
ok.alg_onrgoedkenmerk_waarde)) e
ON a.gebter_key = e.alg_onrgoed_key
LEFT JOIN (SELECT g.alg_gebouw_key, 63 kdeel -- 63% van A-HI (=1572) op TH
FROM alg_gebouw g
WHERE g.alg_gebouw_key = 1572
UNION ALL
SELECT g.alg_gebouw_key, 37 kdeel -- 37% van A-HI (=1572) op TI
FROM alg_gebouw g
WHERE g.alg_gebouw_key = 1572) f
ON a.gebter_key = f.alg_gebouw_key;
/* Formatted on 13-3-2014 18:05:55 (QP5 v5.136.908.31019) */
CREATE OR REPLACE VIEW wtca_v_rap_maand_frozen_fact
(
fclt_f_maand,
tot_datum,
opdr,
maatschap,
ksoort,
ksoort_oms,
fclt_f_complex,
gebouw_terrein,
verdieping,
ruimte,
vakgroep,
melding,
omschrijving,
opmerking,
aanmaak,
fclt_f_uitvoerende,
kosten,
fclt_3d_afdeling_key
)
AS
SELECT SUBSTR (fclt_f_archief, 1, 7),
TO_CHAR (
TO_DATE (SUBSTR (fclt_f_archief, 1, 7) || '-01', 'yyyy-mm-dd')
- 1,
'dd-mm-yyyy'),
opdr,
fclt_f_maatschap,
fclt_f_ksoort,
fclt_f_ksoort_oms,
CASE
WHEN COALESCE (kosten, 0) = 0
THEN
'0'
WHEN hide_f_maatschap_key = 21
THEN
'924'
WHEN hide_f_maatschap_key = 22
THEN
'925'
WHEN UPPER (TRIM (fclt_f_ksoort_oms)) =
'STORINGEN PARKEERGARAGE'
THEN
'929'
WHEN SUBSTR (UPPER (TRIM (fclt_f_gebouw_terrein)), -1) = 'H'
OR SUBSTR (UPPER (TRIM (fclt_f_gebouw_terrein)), -3) =
'(H)'
THEN
'928'
WHEN SUBSTR (UPPER (TRIM (fclt_f_gebouw_terrein)), -1) = 'I'
OR SUBSTR (UPPER (TRIM (fclt_f_gebouw_terrein)), -3) =
'(I)'
THEN
'927'
ELSE -- De rest
'0'
END
complex,
fclt_f_gebouw_terrein,
verdieping,
ruimte,
fclt_f_vakgroep,
fclt_f_melding,
omschrijving,
opmerking,
aanmaak,
fclt_f_uitvoerende,
kosten,
fclt_3d_afdeling_key
FROM wtca_v_rap_maand_frozen;
/* Formatted on 20-9-2010 15:25:35 (QP5 v5.115.810.9015) */
CREATE OR REPLACE VIEW wtca_v_rap_freezeopdrachten
@@ -4196,7 +4222,7 @@ AS
BEGIN adm.systrackscriptId('$Id$', 0); END;
/
BEGIN fac.registercustversion('WTCA', 26); END;
BEGIN fac.registercustversion('WTCA', 27); END;
/
COMMIT;
spool off