Betere label views

svn path=/Database/trunk/; revision=9274
This commit is contained in:
Jos Groot Lipman
2006-06-22 09:20:42 +00:00
parent 8d96bd3dc5
commit 38477d439f

View File

@@ -1,8 +1,8 @@
#ifdef PRJ
/* PRJ_VIE.SRC
*
* $Revision: 56 $
* $Modtime: 2-06-06 11:08 $
* $Revision: 57 $
* $Modtime: 22-06-06 9:20 $
*/
#include "comsql.h"
@@ -209,7 +209,7 @@ AS
|| ' * ['
|| prs_a.prs_afdeling_naam
|| ']: '
|| TO_CHAR (NVL (prs_pw.prj_perslidwerkplek_bezetting, 0))
|| NUMBER_TO_CHAR (NVL (prs_pw.prj_perslidwerkplek_bezetting, 0))
|| '%' waarde,
'PRJ_PERSLIDWERKPLEK' label_soort, prs_pw.prj_perslidwerkplek_key label_key
FROM prj_ruimte prj_r,
@@ -231,7 +231,7 @@ AS
|| DECODE (prs_p.prs_perslid_voorletters, NULL, '', ', ' || prs_p.prs_perslid_voorletters)
|| DECODE (prs_p.prs_perslid_voornaam, NULL, '', ' (' || prs_p.prs_perslid_voornaam || ')')
|| ': '
|| TO_CHAR (NVL (prs_pw.prj_perslidwerkplek_bezetting, 0))
|| NUMBER_TO_CHAR (NVL (prs_pw.prj_perslidwerkplek_bezetting, 0))
|| '%',
'PRJ_PERSLIDWERKPLEK', prs_pw.prj_perslidwerkplek_key
FROM prj_ruimte prj_r,
@@ -249,7 +249,7 @@ AS
CHR (1)
|| prs_w.prj_werkplek_volgnr
|| ' Vrij: '
|| TO_CHAR (100 - NVL (SUM (prs_wb.prj_perslidwerkplek_bezetting), 0))
|| NUMBER_TO_CHAR (100 - NVL (SUM (prs_wb.prj_perslidwerkplek_bezetting), 0))
|| '%',
'PRJ_WERKPLEK', prs_w.prj_werkplek_key
FROM prj_werkplek prs_w, (SELECT *
@@ -262,31 +262,71 @@ AS
WHERE ps.prj_scenario_key(+) = DATA.prj_scenario_key AND ps.prj_selectie_tabelnaam(+) = label_soort
AND ps.prj_selectie_tabelkey(+) = label_key;
CREATE_VIEW(prj_v_werkplek_oppervlakte, 0) (prj_werkplek_key, wpopp)
AS
SELECT prj_werkplek_key,
DECODE (prj_werkplek_vastopp,1,
prj_werkplek_opp, (prj_ruimte_bruto_vloeropp - totvastopp)
/ vrijwp
) wpopp
FROM (SELECT prj_ruimte_key, COUNT (*),
COUNT (*) - COUNT (prj_werkplek_vastopp) vrijwp,
COUNT (prj_werkplek_vastopp) vastwp,
SUM (DECODE (prj_werkplek_vastopp,1,
prj_werkplek_opp, 0
)
) totvastopp
FROM prj_werkplek
WHERE prj_werkplek_verwijder is null
GROUP BY prj_ruimte_key) selopp,
prj_ruimte prj_r,
prj_werkplek prj_w
WHERE prj_r.prj_ruimte_key = prj_w.prj_ruimte_key
AND selopp.prj_ruimte_key = prj_r.prj_ruimte_key
AND prj_werkplek_verwijder is null
ORDER BY prj_werkplek_key;
CREATE_VIEW (prj_v_cad_label_werkplekken,0) (prj_ruimte_key, waarde, label_soort, label_key, highlight)
AS
SELECT prj_ruimte_key, waarde, label_soort, label_key, DECODE (prj_selectie_key, NULL, 0, 1) highlight
FROM (SELECT prj_scenario_key, prs_w.prj_ruimte_key,
SELECT prj_ruimte_key,
CHR (1)
|| prs_w.prj_werkplek_volgnr
|| prj_werkplek_volgnr
|| ' ('
|| TO_CHAR (SUM (NVL (prs_pw.prj_perslidwerkplek_bezetting, 0)))
|| NUMBER_TO_CHAR (wpopp, 'FM9999.0')
|| 'm2 '
|| NUMBER_TO_CHAR (bez)
|| '%)' waarde,
'PRJ_WERKPLEK' label_soort, prs_w.prj_werkplek_key label_key
FROM prj_ruimte prj_r, prj_werkplek prs_w, (SELECT *
label_soort, label_key,
DECODE (SIGN (bez - 100),
1, 2,
DECODE (prj_selectie_key, NULL, 0, 1)
) highlight
FROM (SELECT prj_scenario_key, prs_w.prj_ruimte_key,
prs_w.prj_werkplek_volgnr,
SUM (NVL (prs_pw.prj_perslidwerkplek_bezetting, 0)) bez,
'PRJ_WERKPLEK' label_soort,
prs_w.prj_werkplek_key label_key, wpopp
FROM prj_ruimte prj_r,
prj_werkplek prs_w,
prj_v_werkplek_oppervlakte pwo,
(SELECT *
FROM prj_perslidwerkplek
WHERE prj_perslidwerkplek_verwijder IS NULL) prs_pw
WHERE prs_w.prj_werkplek_key = prs_pw.prj_werkplek_key(+)
AND pwo.prj_werkplek_key(+) = prs_w.prj_werkplek_key
AND prs_w.prj_ruimte_key = prj_r.prj_ruimte_key
AND prs_w.prj_werkplek_verwijder IS NULL
-- AND prs_pw.prj_perslidwerkplek_verwijder IS NULL
GROUP BY prj_scenario_key,
prs_w.prj_ruimte_key,
prs_w.prj_werkplek_volgnr,
'PRJ_WERKPLEK',
prs_w.prj_werkplek_key) vdata,
prs_w.prj_werkplek_key,
wpopp) vdata,
prj_selectie ps
WHERE ps.prj_scenario_key(+) = vdata.prj_scenario_key AND ps.prj_selectie_tabelnaam(+) = label_soort
AND ps.prj_selectie_tabelkey(+) = label_key;
WHERE ps.prj_scenario_key(+) = vdata.prj_scenario_key
AND ps.prj_selectie_tabelnaam(+) = label_soort AND ps.prj_selectie_tabelkey(+) =
label_key;
//De objecten in een ruimte (de soort-keys kunnen worden gebruikt om onroerende objecten uit te sluiten)
CREATE_VIEW (prj_v_cad_label_object,0) (prj_ruimte_key,
@@ -309,7 +349,7 @@ AS
//----------------
// Personen met van en naar
CREATE_VIEW (prj_v_prs_verhuizing, 0)
(prs_scenario_key,
(prj_scenario_key,
prs_perslid_key,
prs_afdeling_key,
alg_ruimte_key,
@@ -320,7 +360,7 @@ CREATE_VIEW (prj_v_prs_verhuizing, 0)
prj_werkplek_key2
)
AS
SELECT pwpx.prs_scenario_key, p.prs_perslid_key, d.prs_afdeling_key, w.prs_alg_ruimte_key, w.prs_werkplek_key,
SELECT rx.prj_scenario_key, p.prs_perslid_key, d.prs_afdeling_key, w.prs_alg_ruimte_key, w.prs_werkplek_key,
rx.alg_ruimte_key, rx.prj_ruimte_key, wx.prs_werkplek_key, wx.prj_werkplek_key
FROM prs_v_aanwezigperslid p,
prs_v_afdeling d,
@@ -339,7 +379,7 @@ AS
// afdelingen met van en naar
CREATE_VIEW (prj_v_afd_verhuizing, 0)
(prs_scenario_key,
(prj_scenario_key,
prs_afdeling_key,
alg_ruimte_key,
prs_werkplek_key,
@@ -349,7 +389,7 @@ CREATE_VIEW (prj_v_afd_verhuizing, 0)
prj_werkplek_key2
)
AS
SELECT pwpx.prs_scenario_key, d.prs_afdeling_key, w.prs_alg_ruimte_key, w.prs_werkplek_key,
SELECT rx.prj_scenario_key, d.prs_afdeling_key, w.prs_alg_ruimte_key, w.prs_werkplek_key,
rx.alg_ruimte_key, rx.prj_ruimte_key, wx.prs_werkplek_key, wx.prj_werkplek_key
FROM prs_v_afdeling d,
prs_v_aanwezigwerkplek w,
@@ -366,7 +406,7 @@ AS
// PRJ evenknie (met prs kolomnamen!)
#ifdef PFzijnnietgoedduswaarschijnlijknietgebruikt
CREATE_VIEW(prj_v_werkplek_gegevens, 0) (prj_scenario_key,
prs_werkplek_key,
prs_werkplek_volgnr,
@@ -410,7 +450,7 @@ AS
|| ' - '
|| alg_r.alg_ruimte_nr
|| '/'
|| TO_CHAR (prs_w.prj_werkplek_volgnr),
|| NUMBER_TO_CHAR (prs_w.prj_werkplek_volgnr),
alg_r.alg_ruimte_omschrijving, prs_w.prj_werkplek_vastopp
FROM prj_werkplek prs_w, alg_ruimte alg_r, alg_verdieping alg_v, alg_gebouw alg_g, alg_locatie alg_l
WHERE alg_r.alg_verdieping_key = alg_v.alg_verdieping_key
@@ -487,6 +527,7 @@ AS
FROM prj_perslidwerkplek prs_pw, prs_afdeling prs_a, prj_v_werkplek_gegevens prs_w
WHERE prs_pw.prs_afdeling_key = prs_a.prs_afdeling_key AND prs_pw.prj_werkplek_key = prs_w.prs_werkplek_key;
#endif
#endif // PRJ