174 lines
7.6 KiB
SQL
174 lines
7.6 KiB
SQL
--
|
|
-- $Id$
|
|
--
|
|
-- Customer specific once-script BLCC#51365.SQL.
|
|
|
|
DEFINE thisfile = 'BLCC#51365.SQL'
|
|
DEFINE dbuser = '^BLCC'
|
|
|
|
SET ECHO ON
|
|
SET DEFINE ON
|
|
COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
|
|
WHENEVER SQLERROR EXIT;
|
|
SELECT adm.scriptspoolfile('&dbuser', '&thisfile') AS fcltlogfile FROM DUAL;
|
|
WHENEVER SQLERROR CONTINUE;
|
|
SPOOL &fcltlogfile
|
|
SET DEFINE OFF
|
|
|
|
------ payload begin ------
|
|
|
|
-- Zetten kostensoort = 4299 (key=112) voor alle klantwensen.
|
|
UPDATE mld_stdmelding sm
|
|
SET sm.prs_kostensoort_key = 112 -- 4299
|
|
WHERE sm.prs_kostensoort_key <> 112 -- 4299
|
|
AND EXISTS
|
|
(SELECT 1
|
|
FROM mld_discipline
|
|
WHERE ins_srtdiscipline_key = 42 -- Klantwens
|
|
AND ins_discipline_key = sm.mld_ins_discipline_key);
|
|
COMMIT;
|
|
|
|
-- Aanvinken 'SLA bewaken'.
|
|
UPDATE mld_stdmelding sm
|
|
SET sm.mld_stdmelding_slabewaken = 1
|
|
WHERE COALESCE (sm.mld_stdmelding_slabewaken, 0) = 0
|
|
AND EXISTS
|
|
(SELECT 1
|
|
FROM mld_discipline
|
|
WHERE ins_srtdiscipline_key IN (41, 42, 43)
|
|
AND ins_discipline_key = sm.mld_ins_discipline_key);
|
|
COMMIT;
|
|
|
|
-- Aanvinken 'Planbaar' als (normale) uitvoertijd = 0.
|
|
UPDATE mld_stdmelding sm
|
|
SET sm.mld_stdmelding_planbaar = 1
|
|
WHERE COALESCE (sm.mld_stdmelding_planbaar, 0) = 0
|
|
AND sm.mld_stdmelding_t_uitvoertijd.tijdsduur = 0
|
|
AND EXISTS
|
|
(SELECT 1
|
|
FROM mld_discipline
|
|
WHERE ins_srtdiscipline_key IN (41, 42, 43)
|
|
AND ins_discipline_key = sm.mld_ins_discipline_key);
|
|
COMMIT;
|
|
|
|
-- Onder 'Huurders Chemelot Campus-bedrijf:
|
|
-- - afdelingscode = <debiteurnummer>
|
|
-- - kostenplaats = 50900-<debiteurnummer>
|
|
-- - budgethouder = Servicedesk Brightlands (key=1421)
|
|
/*
|
|
UPDATE prs_afdeling a
|
|
SET a.prs_afdeling_naam =
|
|
(SELECT kl.prs_kenmerklink_waarde
|
|
FROM prs_v_aanwezigkenmerklink kl
|
|
WHERE kl.prs_kenmerklink_niveau = 'A'
|
|
AND kl.prs_kenmerk_key = 1001
|
|
AND kl.prs_link_key = a.prs_afdeling_key)
|
|
WHERE a.prs_afdeling_verwijder IS NULL
|
|
AND EXISTS
|
|
(SELECT 1
|
|
FROM prs_v_aanwezigkenmerklink kl, prs_v_afdeling_boom ab
|
|
WHERE kl.prs_kenmerklink_niveau = 'A'
|
|
AND kl.prs_kenmerk_key = 1001
|
|
AND kl.prs_link_key = ab.prs_afdeling_key
|
|
AND ab.prs_bedrijf_key = 22 -- Huurders Chemelot Campus
|
|
AND ab.prs_afdeling_key = a.prs_afdeling_key
|
|
AND ab.prs_afdeling_key1 = a.prs_afdeling_key
|
|
AND NOT EXISTS
|
|
(SELECT 1
|
|
FROM prs_v_aanwezigkenmerklink
|
|
WHERE prs_kenmerklink_niveau = 'A'
|
|
AND prs_kenmerk_key = 1001
|
|
AND prs_kenmerklink_waarde = kl.prs_kenmerklink_waarde
|
|
AND prs_link_key <> kl.prs_link_key))
|
|
AND NOT EXISTS
|
|
(SELECT 1
|
|
FROM prs_v_aanwezigkenmerklink kl, prs_v_afdeling_boom ab
|
|
WHERE kl.prs_kenmerklink_niveau = 'A'
|
|
AND kl.prs_kenmerk_key = 1001
|
|
AND kl.prs_link_key = ab.prs_afdeling_key
|
|
AND ab.prs_bedrijf_key = 22 -- Huurders Chemelot Campus
|
|
AND ab.prs_afdeling_key = a.prs_afdeling_key
|
|
AND ab.prs_afdeling_key1 = a.prs_afdeling_key
|
|
AND EXISTS
|
|
(SELECT 1
|
|
FROM prs_afdeling
|
|
WHERE prs_afdeling_verwijder IS NULL
|
|
AND prs_afdeling_naam = kl.prs_kenmerklink_waarde
|
|
AND prs_afdeling_key <> kl.prs_link_key));
|
|
COMMIT;
|
|
|
|
UPDATE prs_kostenplaats kp
|
|
SET kp.prs_kostenplaats_nr =
|
|
(SELECT '50900-' || a.prs_afdeling_naam
|
|
FROM prs_afdeling a, prs_v_afdeling_boom ab
|
|
WHERE a.prs_afdeling_verwijder IS NULL
|
|
AND a.prs_afdeling_key = ab.prs_afdeling_key
|
|
AND ab.prs_bedrijf_key = 22 -- Huurders Chemelot Campus
|
|
AND a.prs_kostenplaats_key = kp.prs_kostenplaats_key),
|
|
kp.prs_kostenplaats_omschrijving =
|
|
(SELECT a.prs_afdeling_omschrijving
|
|
FROM prs_afdeling a, prs_v_afdeling_boom ab
|
|
WHERE a.prs_afdeling_verwijder IS NULL
|
|
AND a.prs_afdeling_key = ab.prs_afdeling_key
|
|
AND ab.prs_bedrijf_key = 22 -- Huurders Chemelot Campus
|
|
AND a.prs_kostenplaats_key = kp.prs_kostenplaats_key)
|
|
WHERE kp.prs_kostenplaats_verwijder IS NULL
|
|
AND EXISTS
|
|
(SELECT 1
|
|
FROM prs_afdeling a, prs_v_afdeling_boom ab
|
|
WHERE a.prs_afdeling_verwijder IS NULL
|
|
AND a.prs_afdeling_key = ab.prs_afdeling_key
|
|
AND ab.prs_bedrijf_key = 22 -- Huurders Chemelot Campus
|
|
AND a.prs_kostenplaats_key = kp.prs_kostenplaats_key)
|
|
AND NOT EXISTS (SELECT 1
|
|
FROM ( SELECT a.prs_kostenplaats_key kpn,
|
|
COUNT (a.prs_kostenplaats_key) cnt
|
|
FROM prs_afdeling a
|
|
WHERE prs_afdeling_verwijder IS NULL
|
|
GROUP BY a.prs_kostenplaats_key) x
|
|
LEFT JOIN
|
|
(SELECT a.prs_kostenplaats_key kpn,
|
|
a.prs_afdeling_naam afd_naam,
|
|
a.prs_afdeling_omschrijving afd_oms
|
|
FROM prs_afdeling a) y
|
|
ON x.kpn = y.kpn
|
|
WHERE x.kpn = kp.prs_kostenplaats_key AND x.cnt > 1);
|
|
COMMIT;
|
|
|
|
UPDATE prs_kostenplaats kp
|
|
SET kp.prs_perslid_key = 1421
|
|
WHERE kp.prs_kostenplaats_verwijder IS NULL
|
|
AND EXISTS
|
|
(SELECT 1
|
|
FROM prs_afdeling a, prs_v_afdeling_boom ab
|
|
WHERE a.prs_afdeling_verwijder IS NULL
|
|
AND a.prs_afdeling_key = ab.prs_afdeling_key
|
|
AND ab.prs_bedrijf_key = 22 -- Huurders Chemelot Campus
|
|
AND a.prs_kostenplaats_key = kp.prs_kostenplaats_key)
|
|
AND NOT EXISTS (SELECT 1
|
|
FROM ( SELECT a.prs_kostenplaats_key kpn,
|
|
COUNT (a.prs_kostenplaats_key) cnt
|
|
FROM prs_afdeling a
|
|
WHERE prs_afdeling_verwijder IS NULL
|
|
GROUP BY a.prs_kostenplaats_key) x
|
|
LEFT JOIN
|
|
(SELECT a.prs_kostenplaats_key kpn,
|
|
a.prs_afdeling_naam afd_naam,
|
|
a.prs_afdeling_omschrijving afd_oms
|
|
FROM prs_afdeling a) y
|
|
ON x.kpn = y.kpn
|
|
WHERE x.kpn = kp.prs_kostenplaats_key AND x.cnt > 1);
|
|
COMMIT;
|
|
*/
|
|
------ payload end ------
|
|
|
|
SET DEFINE OFF
|
|
BEGIN adm.systrackscriptId ('$Id$', 1); END;
|
|
/
|
|
|
|
COMMIT;
|
|
SET ECHO OFF
|
|
SPOOL OFF
|
|
SET DEFINE ON
|
|
PROMPT Logfile of this upgrade is: &fcltlogfile
|