60 lines
2.1 KiB
SQL
60 lines
2.1 KiB
SQL
--
|
|
-- $Id$
|
|
--
|
|
-- Script om alle gebouwnamen te corrigeren. Zijn in verleden door HeyDay zelf per ongeluk met gebouwfunctie gevuld.
|
|
---- Voor update is importsheet gemaakt - FIP 1 aanvullen districten t/m gebouwen
|
|
---- Via tussentabel fac_imp_onrgoed1 gaan we de omzetting doen..
|
|
|
|
DEFINE thisfile = 'AAGN#62393.SQL'
|
|
DEFINE dbuser = 'AAGN'
|
|
|
|
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 ------
|
|
|
|
-- De importsheet met juiste gebouwnamen is ingelezen..
|
|
|
|
-- De update op draaien
|
|
UPDATE alg_gebouw g
|
|
SET g.alg_gebouw_naam =
|
|
(SELECT i.alg_gebouw_naam
|
|
FROM fac_imp_onrgoed1 i, alg_locatie l, alg_gebouw gg
|
|
WHERE i.alg_locatie_code = l.alg_locatie_code
|
|
AND gg.alg_locatie_key = l.alg_locatie_key
|
|
AND i.alg_gebouw_code = gg.alg_gebouw_code
|
|
AND l.alg_locatie_verwijder IS NULL
|
|
AND gg.alg_gebouw_verwijder IS NULL
|
|
AND i.alg_gebouw_naam <> gg.alg_gebouw_naam
|
|
AND gg.alg_gebouw_key = g.alg_gebouw_key)
|
|
WHERE g.alg_gebouw_key IN
|
|
(SELECT gg.alg_gebouw_key
|
|
FROM fac_imp_onrgoed1 i, alg_locatie l, alg_gebouw gg
|
|
WHERE i.alg_locatie_code = l.alg_locatie_code
|
|
AND gg.alg_locatie_key = l.alg_locatie_key
|
|
AND i.alg_gebouw_code = gg.alg_gebouw_code
|
|
AND l.alg_locatie_verwijder IS NULL
|
|
AND gg.alg_gebouw_verwijder IS NULL
|
|
AND i.alg_gebouw_naam <> gg.alg_gebouw_naam);
|
|
|
|
-- De tussentabel voor zekerheid maar leeggooien voordat deze per ongeluk verwerkt wordt..
|
|
DELETE FROM fac_imp_onrgoed1 ;
|
|
|
|
|
|
------ 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 |