SKAF#61893 -- Oncescript om bestelopdrachten en bestellingen om te zetten naar nieuwe aflever_key

svn path=/Customer/; revision=47462
This commit is contained in:
Jos Migo
2020-07-20 20:30:24 +00:00
parent 689d55ad51
commit 7ba0ffbea3

View File

@@ -0,0 +1,76 @@
--
-- $Id$
--
-- In kader herziening meldingsstructuur SKA Kinderopvang worden alle ruimteketen omgezet.
-- Daarbij horen ook de adressen voor BES. Waren er 3. Wordt er eentje (key 1161).
-- Daarom moet na het verwijderen van de oude ruimteketens de bestelling en bestelopdracht omgezet worden naar nieuwe afleveradres_key
DEFINE thisfile = 'SKAF#61893.SQL'
DEFINE dbuser = '^SKAF'
DEFINE custid = 'SKAF'
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 ------
-- Alles van Plons KDV => PLONS
update bes_bestelopdr
set mld_adres_key_lev = 1161
where
mld_adres_key_lev = 35
;
update bes_bestelling
set mld_adres_key_lev = 1161
where
mld_adres_key_lev = 35
;
-- Alles van Plons BSO => PLONS
update bes_bestelopdr
set mld_adres_key_lev = 1161
where
mld_adres_key_lev = 61
;
update bes_bestelling
set mld_adres_key_lev = 1161
where
mld_adres_key_lev = 61
;
-- Alles van Plons SLG => PLONS
update bes_bestelopdr
set mld_adres_key_lev = 1161
where
mld_adres_key_lev = 381
;
update bes_bestelling
set mld_adres_key_lev = 1161
where
mld_adres_key_lev = 381
;
------ 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