INLO#60191 -- Fout in rapportage door aanpassing kenmerksoort bij roomservice-reservering

svn path=/Customer/trunk/; revision=44934

AA/INLO/inlo.sql

@@ -18,7 +18,7 @@ SET DEFINE OFF
 ------ payload begin ------
 
 -- script om dagelijks terugkerende scripts aan te roepen.
--- voor INLO-VEH van toepassing. 
+-- voor INLO-VEH van toepassing.
 -- De urgentiebepaling is hieronder uitgequote. Loopt wel onder assetmanagement van heyday-rabo. Vraag is nog of dit ook voor INLO-VEH gespecificeerd en ingepast moet worden.
 CREATE OR REPLACE PROCEDURE inlo_select_daily_task (p_applname IN VARCHAR2, p_applrun IN VARCHAR2)
 AS
@@ -608,6 +608,7 @@ AS
                WHERE     kw.res_rsv_ruimte_key = rg.rsv_key
                      AND kw.res_kenmerk_key = k.res_kenmerk_key
                      AND kw.res_kenmerkwaarde_verwijder IS NULL
+                     AND k.res_kenmerk_verwijder IS NULL
                      AND k.res_srtkenmerk_key = 41)
                  ExterneKlant,
              (SELECT kw.res_kenmerkreservering_waarde
@@ -615,6 +616,7 @@ AS
                WHERE     kw.res_rsv_ruimte_key = rg.rsv_key
                      AND kw.res_kenmerk_key = k.res_kenmerk_key
                      AND kw.res_kenmerkwaarde_verwijder IS NULL
+                     AND k.res_kenmerk_verwijder IS NULL
                      AND k.res_srtkenmerk_key = 21)
                  Contactpers,
              (SELECT kw.res_kenmerkreservering_waarde
@@ -622,6 +624,7 @@ AS
                WHERE     kw.res_rsv_ruimte_key = rg.rsv_key
                      AND kw.res_kenmerk_key = k.res_kenmerk_key
                      AND kw.res_kenmerkwaarde_verwijder IS NULL
+                     AND k.res_kenmerk_verwijder IS NULL
                      AND k.res_srtkenmerk_key = 1)
                  FactuurAdres,
              rg.artikel,
@@ -894,6 +897,84 @@ BEGIN
 END;
 /
 
+-- Vastgoed contract views voor huuradministratie
+CREATE OR REPLACE VIEW inlo_v_huurruimte_geg_bron
+AS
+SELECT alg_ruimte_bruto_vloeropp,
+       alg_gebouw_upper,
+       alg_verdieping_code,
+       alg_ruimte_nr,
+       alg_ruimte_key,
+       alg_verdieping_key,
+       fac.safe_to_number(aaxx_get_kenmerk('ALG', 1121, r.alg_ruimte_key)) vvo_m2,
+       fac.safe_to_number(aaxx_get_kenmerk('ALG', 1121, r.alg_ruimte_key))
+        * (1 + COALESCE(fac.safe_to_number(aaxx_get_kenmerk('ALG', 1162, r.alg_verdieping_key)),0)/100)
+        * (1 + COALESCE(fac.safe_to_number(aaxx_get_kenmerk('ALG', 1140, r.alg_gebouw_key)),0)/100) sk_m2,
+       COALESCE(fac.safe_to_number(aaxx_get_kenmerk('ALG', 1140, r.alg_gebouw_key)),0) v_sk_g,
+       COALESCE(fac.safe_to_number(aaxx_get_kenmerk('ALG', 1162, r.alg_verdieping_key)),0) v_sk_v,
+       COALESCE(fac.safe_to_number(aaxx_get_kenmerk('ALG', 1141, r.alg_gebouw_key)),0) t_sk,
+       COALESCE(fac.safe_to_number(aaxx_get_kenmerk('ALG', 1160, r.alg_gebouw_key)),0) t_parkmgt,
+       COALESCE(fac.safe_to_number(aaxx_get_kenmerk('ALG', 1161, r.alg_gebouw_key)),0) t_parkeer,
+       COALESCE(fac.safe_to_number(aaxx_get_kenmerk('ALG', 1180, r.alg_ruimte_key)),sr.alg_srtruimte_prijs) t_vvo,
+       sr.alg_srtruimte_code,
+       sr.alg_srtruimte_omschrijving,
+       c.cnt_contract_looptijd_van,
+       c.cnt_contract_looptijd_tot,
+       cp.cnt_contract_key,
+       c.cnt_prs_bedrijf_key
+  FROM cnt_contract c,
+       cnt_contract_plaats cp,
+       alg_v_ruimte_gegevens r,
+       alg_srtruimte sr
+ WHERE cp.cnt_contract_key = c.cnt_contract_key
+   AND cp.CNT_ALG_PLAATS_CODE = 'R'
+   AND cp.cnt_contract_plaats_verwijder IS NULL
+   AND cp.cnt_alg_plaats_key = r.alg_ruimte_key
+   AND r.alg_srtruimte_key = sr.alg_srtruimte_key;
+
+
+CREATE OR REPLACE VIEW inlo_v_rap_verhuur_geg
+AS
+SELECT cnt_contract_key,
+       h.prs_bedrijf_naam,
+       alg_srtruimte_code             code,
+       alg_srtruimte_omschrijving     omschrijving,
+       alg_gebouw_upper,
+       alg_verdieping_code,
+       alg_ruimte_nr,
+       alg_ruimte_bruto_vloeropp,
+       vvo_m2,
+       t_vvo,
+       vvo_m2 * t_vvo                 b_vvo,
+       sk_m2 - vvo_m2                 sk_m2,
+       t_sk,
+       sk_m2 * t_sk                   b_sk,
+       t_parkeer,
+       sk_m2 * t_parkeer              b_parkeer,
+       t_parkmgt,
+       sk_m2 * t_parkmgt              b_parkmgt,
+       (vvo_m2 * t_vvo) +
+       (sk_m2 * t_sk) +
+       (vvo_m2 * t_parkeer) +
+       (sk_m2 * t_parkmgt) tot
+  FROM inlo_v_huurruimte_geg_bron b,
+       prs_bedrijf h
+ WHERE h.prs_bedrijf_key = b.cnt_prs_bedrijf_key;
+
+CREATE OR REPLACE VIEW inlo_v_cad_thema_leegstand(alg_ruimte_key, waarde)
+AS
+    SELECT rg.alg_ruimte_key,
+           DECODE (COALESCE (prs_verhuurbaar, 0),
+                   0, 'Niet verhuurbaar',
+                   DECODE (b.alg_ruimte_key, NULL, 'Leegstand', 'Verhuurd'))    status
+      FROM (SELECT alg_ruimte_key
+              FROM inlo_v_huurruimte_geg_bron
+             WHERE SYSDATE BETWEEN cnt_contract_looptijd_van
+                               AND cnt_contract_looptijd_tot) b,
+           alg_v_ruimte_gegevens  rg,
+           alg_srtruimte          sr
+     WHERE     rg.alg_ruimte_key = b.alg_ruimte_key(+)
+           AND rg.alg_srtruimte_key = sr.alg_srtruimte_key;
 
 ------ payload end   ------