59 lines
1.9 KiB
SQL
59 lines
1.9 KiB
SQL
--
|
|
-- $Id$
|
|
--
|
|
-- Customer specific once-script SVRZ#60162.SQL.
|
|
DEFINE thisfile = 'SVRZ#60162.SQL'
|
|
DEFINE dbuser = '^SVRZ'
|
|
|
|
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 ------
|
|
|
|
SELECT i.ins_discipline_omschrijving,
|
|
i.ins_srtgroep_omschrijving,
|
|
i.ins_srtdeel_code,
|
|
i.ins_srtdeel_omschrijving,
|
|
i.ins_deel_omschrijving,
|
|
i.alg_locatie_code,
|
|
i.alg_gebouw_code,
|
|
i.alg_verdieping_volgnr,
|
|
i.alg_ruimte_nr
|
|
FROM fac_imp_ins i
|
|
WHERE NOT EXISTS
|
|
(SELECT 1
|
|
FROM alg_locatie l, alg_gebouw g, alg_v_aanwezigverdieping v
|
|
WHERE l.alg_locatie_key = g.alg_locatie_key
|
|
AND g.alg_gebouw_key = v.alg_gebouw_key
|
|
AND UPPER (l.alg_locatie_code) = UPPER (i.alg_locatie_code)
|
|
AND g.alg_gebouw_upper = UPPER (i.alg_gebouw_code)
|
|
AND v.alg_verdieping_volgnr = i.alg_verdieping_volgnr);
|
|
|
|
INSERT INTO alg_ruimte (alg_verdieping_key, alg_srtruimte_key, alg_ruimte_nr, alg_ruimte_omschrijving)
|
|
SELECT DISTINCT v.alg_verdieping_key, 101, 'B.0001', 'H' || CHR(38) || 'O (fictieve) ruimte'
|
|
FROM alg_locatie l, alg_gebouw g, alg_v_aanwezigverdieping v, fac_imp_ins i
|
|
WHERE l.alg_locatie_key = g.alg_locatie_key
|
|
AND g.alg_gebouw_key = v.alg_gebouw_key
|
|
AND UPPER (l.alg_locatie_code) = UPPER (i.alg_locatie_code)
|
|
AND g.alg_gebouw_upper = UPPER (i.alg_gebouw_code)
|
|
AND v.alg_verdieping_volgnr = i.alg_verdieping_volgnr;
|
|
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
|