KLAV#85160 -- Huurder rapportage

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

KLAV/KLAV.sql

@@ -0,0 +1,95 @@
+--
+-- $Id$
+--
+-- Script containing customer specific sql statements for the KLAV database
+
+
+DEFINE thisfile = 'KLAV.SQL'
+DEFINE dbuser   = 'KLAV'
+
+SET ECHO ON
+SET DEFINE ON
+COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
+COLUMN fcltcusttxt NEW_VALUE fcltcusttxt NOPRINT;
+WHENEVER SQLERROR CONTINUE;
+SELECT adm.getscriptspoolfile('&thisfile') AS fcltlogfile FROM DUAL;
+SPOOL &fcltlogfile
+WHENEVER SQLERROR EXIT;
+SELECT adm.checkscriptcust('&dbuser') AS fcltcusttxt FROM DUAL;
+WHENEVER SQLERROR CONTINUE;
+---------------------------------------
+PROMPT &fcltcusttxt
+---------------------------------------
+SET DEFINE OFF
+
+------ payload begin ------
+
+CREATE OR REPLACE VIEW klav_v_rap_huurders
+AS
+      SELECT h.bedrijf,
+             h.aantal_m2,
+             verh.totaal_m2,
+             ROUND ((SUM (h.aantal_m2) / verh.totaal_m2) * 100)
+                 percentage,
+             POST.kenmerk
+                 POST,
+             POST.waarde
+                 kosten_totaal,
+             ROUND (POST.waarde * (SUM (h.aantal_m2) / verh.totaal_m2), 2)
+                 te_betalen
+        FROM (  SELECT pb.prs_bedrijf_naam               bedrijf,
+                       kc.cnt_kenmerkcontract_waarde     aantal_m2,
+                       cp.cnt_alg_plaats_key
+                  FROM cnt_contract     ct,
+                       cnt_kenmerkcontract kc,
+                       prs_bedrijf      pb,
+                       cnt_contract_plaats cp
+                 WHERE     ct.cnt_contract_key = kc.cnt_contract_key
+                       AND ct.cnt_contract_key = cp.cnt_contract_key
+                       AND kc.cnt_kenmerk_key = 1                 -- Aantal m2
+                       AND ct.ins_discipline_key = 21      -- Huurovereenkomst
+                       AND ct.cnt_contract_verwijder IS NULL
+                       AND ct.cnt_contract_looptijd_tot > SYSDATE
+                       AND ct.cnt_prs_bedrijf_key = pb.prs_bedrijf_key
+              GROUP BY pb.prs_bedrijf_naam,
+                       kc.cnt_kenmerkcontract_waarde,
+                       cp.cnt_alg_plaats_key) h,
+             (SELECT g.alg_gebouw_key,
+                     ak.alg_kenmerk_omschrijving                           kenmerk,
+                     fac.safe_to_number (oak.alg_onrgoedkenmerk_waarde)    waarde
+                FROM alg_gebouw g, alg_kenmerk ak, alg_onrgoedkenmerk oak
+               WHERE     oak.alg_kenmerk_key = ak.alg_kenmerk_key
+                     AND oak.alg_onrgoed_key = alg_gebouw_key
+                     AND oak.alg_onrgoed_niveau = 'G') POST,
+             (  SELECT cp.cnt_alg_plaats_key,
+                       SUM (kc.cnt_kenmerkcontract_waarde)     totaal_m2
+                  FROM cnt_contract     ct,
+                       cnt_kenmerkcontract kc,
+                       cnt_contract_plaats cp
+                 WHERE     ct.cnt_contract_key = kc.cnt_contract_key
+                       AND ct.cnt_contract_key = cp.cnt_contract_key
+                       AND kc.cnt_kenmerk_key = 1                 -- Aantal m2
+                       AND ct.ins_discipline_key = 21      -- Huurovereenkomst
+                       AND ct.cnt_contract_verwijder IS NULL
+                       AND ct.cnt_contract_looptijd_tot > SYSDATE
+                       AND cp.cnt_alg_plaats_code = 'G'
+              GROUP BY cp.cnt_alg_plaats_key) verh
+       WHERE     POST.alg_gebouw_key = verh.cnt_alg_plaats_key
+             AND POST.alg_gebouw_key = h.cnt_alg_plaats_key
+    GROUP BY h.bedrijf,
+             h.aantal_m2,
+             verh.totaal_m2,
+             POST.kenmerk,
+             POST.waarde;
+
+------ payload end   ------
+
+SET DEFINE OFF
+BEGIN adm.systrackscriptId ('$Id$', 0); END;
+/
+
+COMMIT;
+SET ECHO OFF
+SPOOL OFF
+SET DEFINE ON
+PROMPT Logfile of this upgrade is: &fcltlogfile