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

TMGP#77865 -- Implementatie Tomin groep

Browse Source 
svn path=/Customer/trunk/; revision=64400
This commit is contained in:
Norbert Wassink
2024-04-25 07:26:24 +00:00
parent 85d6a53d09
commit 21688811c9
1 changed files with 138 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

138
TMGP/TMGP.sql
View File

@@ -906,6 +906,144 @@ AS
AND md.ins_discipline_key=ms.mld_ins_discipline_key
AND isd.ins_srtdiscipline_key = md.ins_srtdiscipline_key
CREATE OR REPLACE VIEW TMGP_V_RUIMTEDOORBELAST
(
prs_afdeling_kpn,
prs_afdeling,
prs_afdelinge_bezetting,
alg_locatie_kpn,
alg_locatie_code,
alg_verdieping_oms,
alg_ruimte_nr,
alg_ruimte_oms,
alg_ruimte_categ,
alg_ruimte_bropp,
netto
)
AS
SELECT k1.prs_kostenplaats_nr afdeling_kpn,
a.prs_afdeling_omschrijving,
ra.prs_ruimteafdeling_bezetting,
k2.prs_kostenplaats_nr gebouw_kpn,
l.alg_locatie_code,
v.alg_verdieping_omschrijving,
-- g.alg_gebouw_code||'-'||v.ALG_VERDIEPING_CODE||'-'||r.alg_ruimte_nr,
g.alg_gebouw_code||v.ALG_VERDIEPING_CODE||r.alg_ruimte_nr ruimte_nr,
r.alg_ruimte_omschrijving,
(SELECT fud.fac_usrdata_code
FROM fac_usrdata fud
WHERE fud.fac_usrdata_key=ok.alg_onrgoedkenmerk_waarde) ruimte_categorie,
r.alg_ruimte_bruto_vloeropp,
r.alg_ruimte_bruto_vloeropp*ra.prs_ruimteafdeling_bezetting/100 netto
FROM alg_ruimte r,
prs_ruimteafdeling ra,
prs_afdeling a,
prs_kostenplaats k1,
prs_kostenplaats k2,
alg_v_allonroerendgoed av,
alg_gebouw g,
alg_locatie l,
alg_verdieping v,
alg_onrgoedkenmerk ok,
alg_kenmerk ak
WHERE r.alg_ruimte_key = ra.alg_ruimte_key
AND r.ALG_RUIMTE_VERWIJDER IS NULL
AND a.prs_afdeling_key = ra.prs_afdeling_key
AND k1.prs_kostenplaats_key = a.prs_kostenplaats_key
AND av.alg_ruimte_key = r.alg_ruimte_key
AND l.alg_locatie_key = av.alg_locatie_key
AND g.alg_gebouw_key = av.alg_gebouw_key
AND g.ALG_GEBOUW_VERWIJDER IS NULL
AND v.alg_verdieping_key = r.alg_verdieping_key
AND k2.prs_kostenplaats_key = g.prs_kostenplaats_key
AND ok.alg_onrgoed_key = r.alg_ruimte_key
AND ok.alg_onrgoed_niveau='R'
AND ok.alg_kenmerk_key =ak.alg_kenmerk_key
AND ak.alg_kenmerk_code='RUIMTECATEGORIE';
CREATE OR REPLACE VIEW TMGP_V_PROJECTMELDINGEN
AS
SELECT m.mld_melding_key,
sm.mld_stdmelding_Code,
m.mld_melding_datum,
stat.mld_statuses_omschrijving melding_status,
m.mld_melding_onderwerp,
m.mld_melding_omschrijving,
DECODE(m.mld_melding_spoed,3,lcl.l('lcl_mld_urg_normaal'),1,lcl.l('lcl_mld_urg_kritiek'),2,lcl.l('lcl_mld_urg_hoog'),4,lcl.l('lcl_mld_urg_laag')) prioriteit,
(SELECT p.prs_perslid_naam_friendly
FROM prs_v_perslid_fullnames_all p
WHERE p.prs_perslid_key= m.mld_melding_behandelaar_key) behandelaar,
(SELECT alg_locatie_code from alg_locatie where alg_locatie_key=m.mld_alg_locatie_key ) locatie,
(SELECT mkm.mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding mkm, mld_kenmerk mk
WHERE mk.mld_kenmerk_code = 'STARTDATUM'
AND mkm.mld_kenmerk_key = mk.mld_kenmerk_key
AND mkm.mld_melding_key=m.mld_melding_key) startdatum,
(SELECT mkm.mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding mkm, mld_kenmerk mk
WHERE mk.mld_kenmerk_code = 'EINDDATUM'
AND mkm.mld_kenmerk_key = mk.mld_kenmerk_key
AND mkm.mld_melding_key=m.mld_melding_key) einddatum,
(SELECT fud.fac_usrdata_omschr
FROM mld_kenmerkmelding mkm, mld_kenmerk mk, fac_usrdata fud
WHERE mk.mld_kenmerk_code = 'PROJECTSTATUS'
AND mkm.mld_kenmerk_key = mk.mld_kenmerk_key
AND mkm.mld_melding_key=m.mld_melding_key
AND fud.fac_usrdata_key=mkm.mld_kenmerkmelding_waarde) projectstatus,
(SELECT mkm.mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding mkm, mld_kenmerk mk
WHERE mk.mld_kenmerk_code = 'BEDRAG'
AND mkm.mld_kenmerk_key = mk.mld_kenmerk_key
AND mkm.mld_melding_key=m.mld_melding_key) mld_begroot,
(SELECT SUM(idc.ins_deelsrtcontrole_freezecost)
from mld_melding_object mmo, ins_deelsrtcontrole idc
WHERE mmo.mld_melding_key = m.mld_melding_key
AND idc.ins_deelsrtcontrole_key = mmo.ins_deelsrtcontrole_key) ctr_begroot,
(SELECT SUM(o.mld_opdr_kosten)
FROM mld_opdr o
WHERE o.mld_melding_key=m.mld_melding_key
AND o.mld_statusopdr_key=9) opd_uitnutting,
(SELECT mkm.mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding mkm, mld_kenmerk mk
WHERE mk.mld_kenmerk_code = 'INVESTERINGNR'
AND mkm.mld_kenmerk_key = mk.mld_kenmerk_key
AND mkm.mld_melding_key=m.mld_melding_key) investeringnr,
(SELECT mkm.mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding mkm, mld_kenmerk mk
WHERE mk.mld_kenmerk_code = 'INKOOPORDER'
AND mkm.mld_kenmerk_key = mk.mld_kenmerk_key
AND mkm.mld_melding_key=m.mld_melding_key) inkooporder,
(SELECT fud.fac_usrdata_omschr
FROM mld_kenmerkmelding mkm, mld_kenmerk mk, fac_usrdata fud
WHERE mk.mld_kenmerk_code = 'GEPLAND'
AND mkm.mld_kenmerk_key = mk.mld_kenmerk_key
AND mkm.mld_melding_key=m.mld_melding_key
AND fud.fac_usrdata_key=mkm.mld_kenmerkmelding_waarde) gepland_huidgjaar,
(SELECT fud.fac_usrdata_omschr
FROM mld_kenmerkmelding mkm, mld_kenmerk mk, fac_usrdata fud
WHERE mk.mld_kenmerk_code = 'BEGROOT'
AND mkm.mld_kenmerk_key = mk.MLD_kENMERK_KEY
AND mkm.mld_melding_key=m.mld_melding_key
AND fud.fac_usrdata_key=mkm.mld_kenmerkmelding_waarde) begroot
FROM mld_melding m,
mld_stdmelding sm,
mld_statuses stat
WHERE m.mld_stdmelding_key = sm.mld_stdmelding_key
AND (sm.mld_stdmelding_code = 'PROJECT' OR sm.mld_stdmelding_code = 'PROJECTMJOB')
AND stat.mld_statuses_key = m.mld_melding_status;
------ payload end ------
SET DEFINE OFF