admin/Customer
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

BLCC#72497 Reconstrueren gebouwclustercode/naam met terugwerkende kracht

Browse Source 
svn path=/Customer/; revision=56913
This commit is contained in:
Maarten van der Heide
2022-08-16 17:12:32 +00:00
parent a3edc093b2
commit 1f1139fc73
1 changed files with 154 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

154
onces/BLCC/BLCC#72497_2.sql Normal file
View File

@@ -0,0 +1,154 @@
--
-- $Id$
--
-- Customer specific once-script BLCC#72497_2.sql.
DEFINE thisfile = 'BLCC#72497_2.sql'
DEFINE dbuser = '^BLCC'
SET ECHO ON
SET DEFINE ON
COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
COLUMN fcltcusterr NEW_VALUE fcltcusterr NOPRINT;
WHENEVER SQLERROR CONTINUE;
SELECT adm.getscriptspoolfile('&thisfile') AS fcltlogfile FROM DUAL;
SPOOL &fcltlogfile
WHENEVER SQLERROR EXIT;
SELECT adm.checkscriptcust('&dbuser') AS fcltcusterr FROM DUAL;
WHENEVER SQLERROR CONTINUE;
PROMPT &fcltcusterr
SET DEFINE OFF
------ payload begin ------
-- BLCC#72497: Reconstrueren gebouwclustercode/naam met terugwerkende kracht
-- vanaf (huur)maand 2021-01 op basis van actuele cluster.
/*
SELECT x.gebouwclustercode,
(SELECT ud.fac_usrdata_code
FROM alg_v_aanwezigonrgoedkenmerk ok,
fac_v_aanwezigusrdata ud,
alg_verdieping v,
alg_ruimte r
WHERE ok.alg_onrgoed_niveau = 'G'
AND ok.alg_kenmerk_key = 1940 -- Gebouwcluster
AND fac.safe_to_number (ok.alg_onrgoedkenmerk_waarde) = ud.fac_usrdata_key
AND ud.fac_usrtab_key = 1061 -- Gebouwclusters
AND ok.alg_onrgoed_key = v.alg_gebouw_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND r.alg_ruimte_key = x.alg_ruimte_key)
FROM blcc_alg_freeze x
WHERE x.gebouwclustercode IS NULL
AND EXISTS
(SELECT 1
FROM alg_v_aanwezigonrgoedkenmerk ok,
fac_v_aanwezigusrdata ud,
alg_verdieping v,
alg_ruimte r
WHERE ok.alg_onrgoed_niveau = 'G'
AND ok.alg_kenmerk_key = 1940 -- Gebouwcluster
AND fac.safe_to_number (ok.alg_onrgoedkenmerk_waarde) = ud.fac_usrdata_key
AND ud.fac_usrtab_key = 1061 -- Gebouwclusters
AND ok.alg_onrgoed_key = v.alg_gebouw_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND r.alg_ruimte_key = x.alg_ruimte_key);
*/
UPDATE blcc_alg_freeze x
SET x.gebouwclustercode =
(SELECT ud.fac_usrdata_code
FROM alg_v_aanwezigonrgoedkenmerk ok,
fac_v_aanwezigusrdata ud,
alg_verdieping v,
alg_ruimte r
WHERE ok.alg_onrgoed_niveau = 'G'
AND ok.alg_kenmerk_key = 1940 -- Gebouwcluster
AND fac.safe_to_number (ok.alg_onrgoedkenmerk_waarde) = ud.fac_usrdata_key
AND ud.fac_usrtab_key = 1061 -- Gebouwclusters
AND ok.alg_onrgoed_key = v.alg_gebouw_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND r.alg_ruimte_key = x.alg_ruimte_key)
WHERE x.gebouwclustercode IS NULL
AND EXISTS
(SELECT 1
FROM alg_v_aanwezigonrgoedkenmerk ok,
fac_v_aanwezigusrdata ud,
alg_verdieping v,
alg_ruimte r
WHERE ok.alg_onrgoed_niveau = 'G'
AND ok.alg_kenmerk_key = 1940 -- Gebouwcluster
AND fac.safe_to_number (ok.alg_onrgoedkenmerk_waarde) = ud.fac_usrdata_key
AND ud.fac_usrtab_key = 1061 -- Gebouwclusters
AND ok.alg_onrgoed_key = v.alg_gebouw_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND r.alg_ruimte_key = x.alg_ruimte_key);
COMMIT;
/*
SELECT x.gebouwclusternaam,
(SELECT ud.fac_usrdata_omschr
FROM alg_v_aanwezigonrgoedkenmerk ok,
fac_v_aanwezigusrdata ud,
alg_verdieping v,
alg_ruimte r
WHERE ok.alg_onrgoed_niveau = 'G'
AND ok.alg_kenmerk_key = 1940 -- Gebouwcluster
AND fac.safe_to_number (ok.alg_onrgoedkenmerk_waarde) = ud.fac_usrdata_key
AND ud.fac_usrtab_key = 1061 -- Gebouwclusters
AND ok.alg_onrgoed_key = v.alg_gebouw_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND r.alg_ruimte_key = x.alg_ruimte_key)
FROM blcc_alg_freeze x
WHERE x.gebouwclusternaam IS NULL
AND EXISTS
(SELECT 1
FROM alg_v_aanwezigonrgoedkenmerk ok,
fac_v_aanwezigusrdata ud,
alg_verdieping v,
alg_ruimte r
WHERE ok.alg_onrgoed_niveau = 'G'
AND ok.alg_kenmerk_key = 1940 -- Gebouwcluster
AND fac.safe_to_number (ok.alg_onrgoedkenmerk_waarde) = ud.fac_usrdata_key
AND ud.fac_usrtab_key = 1061 -- Gebouwclusters
AND ok.alg_onrgoed_key = v.alg_gebouw_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND r.alg_ruimte_key = x.alg_ruimte_key);
*/
UPDATE blcc_alg_freeze x
SET x.gebouwclusternaam =
(SELECT ud.fac_usrdata_omschr
FROM alg_v_aanwezigonrgoedkenmerk ok,
fac_v_aanwezigusrdata ud,
alg_verdieping v,
alg_ruimte r
WHERE ok.alg_onrgoed_niveau = 'G'
AND ok.alg_kenmerk_key = 1940 -- Gebouwcluster
AND fac.safe_to_number (ok.alg_onrgoedkenmerk_waarde) = ud.fac_usrdata_key
AND ud.fac_usrtab_key = 1061 -- Gebouwclusters
AND ok.alg_onrgoed_key = v.alg_gebouw_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND r.alg_ruimte_key = x.alg_ruimte_key)
WHERE x.gebouwclusternaam IS NULL
AND EXISTS
(SELECT 1
FROM alg_v_aanwezigonrgoedkenmerk ok,
fac_v_aanwezigusrdata ud,
alg_verdieping v,
alg_ruimte r
WHERE ok.alg_onrgoed_niveau = 'G'
AND ok.alg_kenmerk_key = 1940 -- Gebouwcluster
AND fac.safe_to_number (ok.alg_onrgoedkenmerk_waarde) = ud.fac_usrdata_key
AND ud.fac_usrtab_key = 1061 -- Gebouwclusters
AND ok.alg_onrgoed_key = v.alg_gebouw_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND r.alg_ruimte_key = x.alg_ruimte_key);
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