TAYL#78713 -- Implementatie Facilitor bij Taylor en Wessing - thema's voor Graphics
svn path=/Customer/trunk/; revision=61438
This commit is contained in:
Jos Migo
176
TAYL/tayl.sql
Normal file
176
TAYL/tayl.sql
Normal file
@@ -0,0 +1,176 @@
|
|||||||
|
--
|
||||||
|
-- $Id$
|
||||||
|
--
|
||||||
|
-- Script containing customer specific sql statements for the FACILITOR database
|
||||||
|
|
||||||
|
DEFINE thisfile = 'TAYL.SQL'
|
||||||
|
DEFINE dbuser = 'TAYL'
|
||||||
|
|
||||||
|
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 ------
|
||||||
|
|
||||||
|
-------------------------------
|
||||||
|
--- DOMEIN-VIEWS --------------
|
||||||
|
-------------------------------
|
||||||
|
|
||||||
|
CREATE OR REPLACE VIEW tayl_v_leverancierslijst
|
||||||
|
(
|
||||||
|
PRS_BEDRIJF_KEY,
|
||||||
|
BEDRIJF_NAAM,
|
||||||
|
BEDRIJF_PLAATS,
|
||||||
|
PRS_BEDRIJF_VERWIJDER
|
||||||
|
)
|
||||||
|
AS
|
||||||
|
SELECT
|
||||||
|
b.prs_bedrijf_key,
|
||||||
|
b.prs_bedrijf_naam,
|
||||||
|
b.prs_bedrijf_post_plaats,
|
||||||
|
b.prs_bedrijf_verwijder
|
||||||
|
FROM
|
||||||
|
prs_bedrijf b
|
||||||
|
WHERE
|
||||||
|
prs_bedrijf_intern IS NULL
|
||||||
|
AND prs_bedrijf_verwijder IS NULL
|
||||||
|
ORDER BY prs_bedrijf_naam
|
||||||
|
;
|
||||||
|
|
||||||
|
------------------------------
|
||||||
|
--- AUTOCAD-THEMA'S ----------
|
||||||
|
------------------------------
|
||||||
|
|
||||||
|
CREATE OR REPLACE VIEW tayl_v_thema_vloersoort
|
||||||
|
(
|
||||||
|
ALG_RUIMTE_KEY,
|
||||||
|
WAARDE,
|
||||||
|
WAARDE_KEY
|
||||||
|
)
|
||||||
|
AS
|
||||||
|
SELECT r.alg_ruimte_key,
|
||||||
|
COALESCE (va.fac_usrdata_omschr, 'Onbekend'),
|
||||||
|
va.fac_usrdata_key
|
||||||
|
FROM alg_ruimte r,
|
||||||
|
(SELECT rr.alg_ruimte_key,
|
||||||
|
ud.fac_usrdata_omschr,
|
||||||
|
ud.fac_usrdata_key
|
||||||
|
FROM alg_onrgoedkenmerk ok,
|
||||||
|
fac_usrdata ud,
|
||||||
|
fac_kenmerkdomein rk,
|
||||||
|
alg_kenmerk k,
|
||||||
|
alg_v_aanwezigruimte rr
|
||||||
|
WHERE rk.fac_usrtab_key = ud.fac_usrtab_key
|
||||||
|
AND k.fac_kenmerkdomein_key = rk.fac_kenmerkdomein_key
|
||||||
|
AND TO_CHAR (ud.fac_usrdata_key) =
|
||||||
|
ok.alg_onrgoedkenmerk_waarde
|
||||||
|
AND ok.alg_kenmerk_key = 1040
|
||||||
|
AND k.alg_kenmerk_niveau = 'R'
|
||||||
|
AND k.alg_kenmerk_verwijder IS NULL
|
||||||
|
AND rr.alg_ruimte_key = ok.alg_onrgoed_key) va
|
||||||
|
WHERE r.alg_ruimte_key = va.alg_ruimte_key(+);
|
||||||
|
|
||||||
|
CREATE OR REPLACE VIEW tayl_v_thema_set_res_wp
|
||||||
|
AS
|
||||||
|
SELECT ins_deel_key, DECODE (rd.res_deel_key, NULL, 0, 1) waarde
|
||||||
|
FROM ins_deel d,
|
||||||
|
(SELECT *
|
||||||
|
FROM res_deel
|
||||||
|
WHERE res_deel_verwijder IS NULL) rd
|
||||||
|
WHERE d.ins_deel_key = rd.res_ins_deel_key(+);
|
||||||
|
|
||||||
|
-------------------------------
|
||||||
|
--- PROCEDURES ---------------
|
||||||
|
-------------------------------
|
||||||
|
|
||||||
|
|
||||||
|
-------------------------------
|
||||||
|
--- NOTI-JOBS ---------------
|
||||||
|
-------------------------------
|
||||||
|
|
||||||
|
-- TAYLOR: Contractbeheerder(_eig) is Beheerder/Administrateur en de Contractverantwoordelijke (_beh) is 1e aanspreekpunt die beslist over wel/niet verlengen
|
||||||
|
CREATE OR REPLACE VIEW tayl_v_noti_cntreminder
|
||||||
|
(
|
||||||
|
code,
|
||||||
|
sender,
|
||||||
|
receiver,
|
||||||
|
text,
|
||||||
|
key,
|
||||||
|
xkey,
|
||||||
|
xemail,
|
||||||
|
xmobile
|
||||||
|
)
|
||||||
|
AS -- Op rappel-datum naar de Beheerder/Administrateur sturen
|
||||||
|
SELECT 'CNTMAI',
|
||||||
|
NULL,
|
||||||
|
c.prs_perslid_key_beh,
|
||||||
|
'TER INFO: Rappel verstuurd voor contract ' || c.cnt_contract_nummer_intern
|
||||||
|
|| DECODE (c.cnt_contract_versie, NULL, '', '.' || c.cnt_contract_versie)
|
||||||
|
|| ' (' || c.cnt_contract_omschrijving || ' ' || b.prs_bedrijf_naam || ')'
|
||||||
|
|| ' - Moet uiterlijk per ' || TO_CHAR (cnt.cnt_getopzegdatum (c.cnt_contract_key), 'dd-mm-yyyy')
|
||||||
|
|| ' worden verlengd of opgezegd.',
|
||||||
|
c.cnt_contract_key,
|
||||||
|
NULL,
|
||||||
|
NULL,
|
||||||
|
NULL
|
||||||
|
FROM cnt_v_aanwezigcontract c, prs_bedrijf b
|
||||||
|
WHERE c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
||||||
|
AND cnt_contract_status = 0
|
||||||
|
AND cnt.cnt_getrappeldatum (c.cnt_contract_key) = TRUNC (SYSDATE)
|
||||||
|
AND c.prs_perslid_key_beh <> c.prs_perslid_key_eig -- als administratuer gelijk aan 1e aanspreekpunt dan dan sturen we de info-mail niet uit
|
||||||
|
AND NOT EXISTS -- kenmerkveld 'Opgezegd' staat uit
|
||||||
|
(SELECT km.cnt_contract_key
|
||||||
|
FROM cnt_kenmerkcontract km, cnt_kenmerk k
|
||||||
|
WHERE km.cnt_contract_key = c.cnt_contract_key AND km.cnt_kenmerk_key = k.cnt_kenmerk_key AND k.cnt_srtkenmerk_key = 7)
|
||||||
|
UNION ALL -- Op rappel-datum ACTIE-mail naar het 1e aanspreekpunt sturen
|
||||||
|
SELECT 'CUST01',
|
||||||
|
NULL,
|
||||||
|
c.prs_perslid_key_eig,
|
||||||
|
'ACTIE: Rappel verstuurd voor contract ' || c.cnt_contract_nummer_intern
|
||||||
|
|| DECODE (c.cnt_contract_versie, NULL, '', '.' || c.cnt_contract_versie)
|
||||||
|
|| ' (' || c.cnt_contract_omschrijving || ' ' || b.prs_bedrijf_naam || ')'
|
||||||
|
|| ' - Moet uiterlijk per ' || TO_CHAR (cnt.cnt_getopzegdatum (c.cnt_contract_key), 'dd-mm-yyyy')
|
||||||
|
|| ' worden verlengd of opgezegd.',
|
||||||
|
c.cnt_contract_key,
|
||||||
|
NULL,
|
||||||
|
NULL,
|
||||||
|
NULL
|
||||||
|
FROM cnt_v_aanwezigcontract c, prs_bedrijf b
|
||||||
|
WHERE c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
|
||||||
|
AND cnt_contract_status = 0
|
||||||
|
AND cnt.cnt_getrappeldatum (c.cnt_contract_key) = TRUNC (SYSDATE)
|
||||||
|
AND c.prs_perslid_key_eig IS NOT NULL
|
||||||
|
AND NOT EXISTS -- kenmerkveld 'Opgezegd' staat uit
|
||||||
|
(SELECT km.cnt_contract_key
|
||||||
|
FROM cnt_kenmerkcontract km, cnt_kenmerk k
|
||||||
|
WHERE km.cnt_contract_key = c.cnt_contract_key AND km.cnt_kenmerk_key = k.cnt_kenmerk_key AND k.cnt_srtkenmerk_key = 7) ;
|
||||||
|
|
||||||
|
-------------------------------
|
||||||
|
--- RAPPORTAGES ---------------
|
||||||
|
-------------------------------
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
------ 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
|
||||||
Reference in New Issue
Block a user