KW1C#86841 View voor actuele ruimtebezetting

svn path=/Database/trunk/; revision=67373

CAD/CAD_VIE.SRC

@@ -112,6 +112,30 @@ BEGIN
 END;
 /
 
+-- Toont de huidige afdeling die aan een ruimte gekoppeld is, en Meerdere! indien meerdere.
+-- Ondersteunt dus (wel) bezettingsintervallen/historie. Niet sleepbaar want geen triviaal antwoord op
+-- welke periode je dan moet doen (nu tot onbepaald zou kunnen, en dan moet je dus de huidige periode sluiten)
+-- Gebruik prs_afdeling_naam6 formattering (ongeacht S(prs_dep_string))
+CREATE_VIEW(cad_v_thema_huidigeafdelingen, 0)
+(
+    alg_ruimte_key
+  , waarde
+)
+AS
+   SELECT x.alg_ruimte_key,
+          DECODE (x.aantal,
+             1, SUBSTR (x.sp, 1, 60),
+             'Meerdere!')
+   FROM (SELECT ra.alg_ruimte_key,
+                MIN (d.prs_afdeling_naam || '-' || d.prs_afdeling_omschrijving) sp,
+                MIN (d.prs_afdeling_key) sp_key,
+                COUNT (ra.prs_afdeling_key) aantal
+         FROM prs_v_aanwezigruimteafdeling ra, prs_v_aanwezigafdeling d
+         WHERE ra.prs_afdeling_key = d.prs_afdeling_key
+           AND SYSDATE BETWEEN ra.prs_ruimteafdeling_ingangsdatum 
+               AND COALESCE (ra.prs_ruimteafdeling_einddatum, TRUNC (SYSDATE) + 1)         
+         GROUP BY ra.alg_ruimte_key) x;
+
 // De afdelingsbezetting maar dan gebaseerd op de afdelingen
 // van de de personen die op de werkplekken zitten
 CREATE_VIEW(cad_v_thema_prsafdelingen, 0)