104 lines
4.1 KiB
SQL
104 lines
4.1 KiB
SQL
--
|
|
-- $Id$
|
|
--
|
|
-- Script containing customer specific sql statements for the FACILITOR database
|
|
|
|
|
|
DEFINE thisfile = 'trrl.sql'
|
|
DEFINE dbuser = 'TRRL'
|
|
|
|
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 ------
|
|
|
|
-- Rapportage om kostenoverzicht van de gemaakte reserveringen uit te draaien.
|
|
-- De normaal berekende kosten kunnen overrulled worden door de kosten in het veld met
|
|
-- kenmerk key 1. Is dit kenmerk gevuld, dan gelden deze kosten.
|
|
CREATE OR REPLACE VIEW trrl_v_rap_res_fin_gegevens
|
|
AS
|
|
SELECT rrr.res_reservering_key || '/' || rrr.res_rsv_ruimte_volgnr res_reservering_nr,
|
|
rrr.res_rsv_ruimte_key,
|
|
rrr.res_rsv_ruimte_van res_rsv_ruimte_datum,
|
|
rrr.res_rsv_ruimte_van res_rsv_ruimte_van,
|
|
rrr.res_rsv_ruimte_tot res_rsv_ruimte_tot,
|
|
pf.prs_perslid_naam_full,
|
|
rrr.res_rsv_ruimte_omschrijving,
|
|
rr.res_ruimte_nr,
|
|
k.prs_kostenplaats_omschrijving,
|
|
COALESCE (FAC.safe_to_number (flx.getflex ('RES', 1, rrr.res_rsv_ruimte_key)),
|
|
RES.getruimteprijs (rrr.res_rsv_ruimte_key)) prijs
|
|
FROM res_rsv_ruimte rrr,
|
|
prs_kostenplaats k,
|
|
prs_v_perslid_fullnames pf,
|
|
res_ruimte_opstelling rro,
|
|
res_ruimte rr
|
|
WHERE rrr.prs_kostenplaats_key = k.prs_kostenplaats_key
|
|
AND rrr.res_rsv_ruimte_host_key = pf.prs_perslid_key
|
|
AND rrr.res_ruimte_opstel_key = rro.res_ruimte_opstel_key
|
|
AND rro.res_ruimte_key = rr.res_ruimte_key
|
|
AND rrr.res_rsv_ruimte_verwijder IS NULL;
|
|
|
|
-- Rapport om de door te belasten kosten van de meldingen te tonen.
|
|
CREATE OR REPLACE VIEW trrl_v_rap_mld_fin_gegevens
|
|
AS
|
|
SELECT psl.prs_perslid_naam,
|
|
TO_NUMBER (kmm.mld_kenmerkmelding_waarde)
|
|
mld_kenmerkmelding_waarde,
|
|
meld.mld_melding_onderwerp,
|
|
meld.mld_melding_omschrijving,
|
|
meld.mld_melding_datum,
|
|
dis.ins_discipline_omschrijving,
|
|
std.mld_stdmelding_omschrijving,
|
|
srtdis.ins_srtdiscipline_omschrijving,
|
|
kp.prs_kostenplaats_nr,
|
|
kp.prs_kostenplaats_omschrijving,
|
|
MLD.getmeldingstatusdate (meld.mld_melding_key, 5)
|
|
mld_melding_afmelddatum
|
|
FROM mld_srtkenmerk srt,
|
|
mld_kenmerk km,
|
|
mld_kenmerkmelding kmm,
|
|
prs_perslid psl,
|
|
mld_melding meld,
|
|
mld_discipline dis,
|
|
mld_stdmelding std,
|
|
ins_srtdiscipline srtdis,
|
|
prs_kostenplaats kp,
|
|
alg_v_allonrgoed_gegevens aog -- alle onroerend goed gegevens met unieke key, ruimte kan dus nooit een zelfde key hebben als verdieping of gebouw
|
|
WHERE srt.mld_srtkenmerk_key = km.mld_srtkenmerk_key
|
|
AND kmm.mld_kenmerk_key = km.mld_kenmerk_key
|
|
AND meld.mld_melding_key = kmm.mld_melding_key
|
|
AND meld.prs_perslid_key = psl.prs_perslid_key
|
|
AND meld.mld_alg_onroerendgoed_keys = aog.alg_onroerendgoed_keys
|
|
AND std.mld_ins_discipline_key = dis.ins_discipline_key
|
|
AND std.mld_stdmelding_key = meld.mld_stdmelding_key
|
|
AND srt.mld_srtkenmerk_key = 21 -- Door te belasten kosten.
|
|
AND dis.ins_srtdiscipline_key = srtdis.ins_srtdiscipline_key
|
|
AND kp.prs_kostenplaats_key = meld.prs_kostenplaats_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
|
|
|