--
-- $Id$
--
-- Script containing customer specific sql statements for the FACILITOR database KNGF

DEFINE thisfile = 'KNGF.SQL'
DEFINE dbuser   = 'KNGF'

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 KNGF_V_LABEL_DEEL_RES_DATUM
(
    FCLT_F_DATUM,
    INS_DEEL_KEY,
    RES_DEEL_OMSCHRIJVING,
    WAARDE1,
    WAARDE,
    WAARDE3,
    WAARDE_HTML,
    WAARDE_HTML2, 
    TOOLTIP
)
AS
    WITH
        datums
        AS
            (    SELECT TRUNC (SYSDATE) + LEVEL - 1 datum
                   FROM DUAL
             CONNECT BY LEVEL <= 42)
      SELECT datums.datum
                 fclt_f_datum,
             isd.res_ins_deel_key
                 ins_deel_key,
             res_deel_omschrijving,
                CHR (10)
             || LISTAGG (
                    DECODE (naam,
                            NULL, '',
                            '[s40]' || naam),
                    CHR (10))
                    WITHIN GROUP (ORDER BY res_rsv_deel_van)
                 waarde1,
                CHR (10)
             || LISTAGG (
                    DECODE (naam,
                            NULL, '',
                            '[s40]' || naam),
                    CHR (10))
                    WITHIN GROUP (ORDER BY res_rsv_deel_van)
                 waarde2,
                CHR (10)
             || LISTAGG (DECODE (naam, NULL, '', '[s40]' || naam), CHR (10))
                    WITHIN GROUP (ORDER BY res_rsv_deel_van)
                 waarde3,
             LISTAGG (DECODE (naam, NULL, '', '<span class="body">' || naam || '</span>'), '<br>')
                 waarde_html,
             LISTAGG (DECODE (naam, NULL, '', '<span class="body">' || naam || '</span>'), '<br>')
                 WITHIN GROUP (ORDER BY res_rsv_deel_van)
                 waarde_html2,
                 res.naam
        FROM res_v_aanwezigdeel isd,
             datums,
             (SELECT datum,
                     res_ins_deel_key,
                     DECODE (p.prs_perslid_visibility,
                             1, LOWER(p.prs_perslid_oslogin),
                             a.prs_afdeling_omschrijving)
                         naam,
                     res_rsv_deel_van,
                     res_rsv_deel_tot
                FROM res_v_aanwezigdeel     r,
                     res_v_aanwezigrsv_deel rrd,
                     res_rsv_ruimte         rrr,
                     prs_v_perslid_fullnames pf,
                     prs_perslid            p,
                     prs_afdeling           a,
                     datums
               WHERE     r.res_deel_key = rrd.res_deel_key
                     AND rrd.res_rsv_ruimte_key = rrr.res_rsv_ruimte_key
                     AND rrr.res_rsv_ruimte_host_key = pf.prs_perslid_key
                     AND pf.prs_perslid_key = p.prs_perslid_key
                     AND p.prs_afdeling_key = a.prs_afdeling_key
                     AND datum + 1 >= res_rsv_deel_van
                     AND datum < res_rsv_deel_tot ) res                          -- Bezet
       WHERE isd.res_ins_deel_key = res.res_ins_deel_key(+) AND datums.datum = res.datum(+)
    GROUP BY datums.datum, isd.res_ins_deel_key, res_deel_omschrijving, res_deel_opmerking, res.naam;

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