BLST#70661 -- Migratie naar externnr en verwijderen eigen tabel
svn path=/Customer/; revision=55341
This commit is contained in:
60
onces/BLST/BLST#70661_migratie.sql
Normal file
60
onces/BLST/BLST#70661_migratie.sql
Normal file
@@ -0,0 +1,60 @@
|
||||
|
||||
--
|
||||
-- $Id$
|
||||
--
|
||||
-- Script containing customer specific sql statements for the FACILITOR database
|
||||
-- Voor dbuser invullen: - indien script voor 1 klant is: 'AADS' (de klantcode, zoals vermeld in fac_version_cust)
|
||||
-- - script is voor meerdere klanten: 'AAXX' (de groepcode, zoals vermeld in fac_version_group)
|
||||
-- - script is voor meerdere klanten met naam volgens een bepaald patroon: '^AA|^ASMS|^GULU|^NMMS|^RABO|^ZKHM'
|
||||
-- Ook als het script gedraaid wordt voor de verkeerde cust wordt er een logfile gemaakt.
|
||||
-- (dit in tegenstelling tot sample_xxxx.sql)
|
||||
|
||||
DEFINE thisfile = 'BLST_Tabellen#70661_migratie.SQL'
|
||||
DEFINE dbuser = 'BLST'
|
||||
|
||||
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 ------
|
||||
|
||||
DECLARE
|
||||
v_prefix VARCHAR2(10);
|
||||
BEGIN
|
||||
v_prefix:='';
|
||||
SELECT ud.fac_usrdata_code INTO v_prefix
|
||||
FROM fac_usrtab ut, FAC_USRDATA ud
|
||||
WHERE UPPER (ut.fac_usrtab_naam) = 'BLST_SETTINGS'
|
||||
AND ud.fac_usrtab_key = ut.fac_usrtab_key
|
||||
AND UPPER (ud.fac_usrdata_omschr) = 'SAP_ID';
|
||||
FOR i IN (select item_key, AANVRAAGNR from blst_key_aanvraagnr)
|
||||
LOOP
|
||||
UPDATE res_rsv_ruimte set res_rsv_ruimte_externnr=v_prefix || LPAD (i.aanvraagnr, 10 - LENGTH(v_prefix), '0') WHERE res_rsv_ruimte_key=i.item_key AND res_status_bo_key<>6;
|
||||
END LOOP;
|
||||
END;
|
||||
/
|
||||
|
||||
DROP TABLE blst_key_aanvraagnr;
|
||||
|
||||
------ 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