--
-- $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;
			 
CREATE OR REPLACE VIEW klav_v_ins_qrc_mld
AS
   SELECT i.ins_deel_omschrijving hide_f_sort,
          l.alg_locatie_code||' '||l.alg_locatie_omschrijving fclt_f_locatie,
          o.alg_gebouw_omschrijving fclt_f_gebouw,
          o.alg_plaatsaanduiding fclt_f_plaats,
          d.ins_discipline_omschrijving fclt_f_discipline,
          g.ins_srtgroep_omschrijving fclt_f_objectgroep,
          s.ins_srtdeel_omschrijving fclt_f_objectsoort,
          i.ins_deel_omschrijving fclt_f_identificatie,
          d.ins_discipline_omschrijving||' / '||sm.mld_stdmelding_omschrijving fclt_f_melding,
          i.ins_deel_key,
          s.ins_srtdeel_key,
          o.alg_gebouw_code,
          o.alg_verdieping_code,
          i.ins_discipline_key fclt_3d_discipline_key,
          l.alg_locatie_key fclt_3d_locatie_key,
          i.ins_alg_ruimte_type,
          i.ins_alg_ruimte_key,
          b.fac_bookmark_id hide_f_bookmark_id
     FROM ins_deel i,
          ins_v_alg_overzicht o,
          ins_srtdeel s,
          ins_srtgroep g,
          ins_discipline d,
          alg_locatie l,
          fac_bookmark b,
          mld_stdmelding sm,
          mld_stdmelding_srtinst si
    WHERE b.fac_bookmark_naam = 'QRC_MELDING'
      AND (b.fac_bookmark_expire IS NULL OR b.fac_bookmark_expire > SYSDATE)
      AND ins_deel_verwijder IS NULL
      AND i.ins_deel_module = 'INS'
      AND i.ins_deel_parent_key IS NULL
      AND s.ins_srtdeel_key = i.ins_srtdeel_key
      AND g.ins_srtgroep_key = s.ins_srtgroep_key
      AND d.ins_discipline_key = g.ins_discipline_key
      AND o.alg_onroerendgoed_keys = i.ins_alg_ruimte_key
      AND o.alg_onroerendgoed_type = i.ins_alg_ruimte_type
      AND i.ins_alg_ruimte_type IN ('R')
      AND o.alg_locatie_key = i.ins_alg_locatie_key
      AND i.ins_alg_locatie_key = l.alg_locatie_key
      AND sm.mld_stdmelding_key = si.mld_stdmelding_key
      AND si.ins_srtinstallatie_key = DECODE(si.ins_srtinstallatie_niveau,
                                      'S', i.ins_srtdeel_key,
                                      'G', s.ins_srtgroep_key,
                                      'D', g.ins_discipline_key);

------ 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