FMHN#74630 Omzetten flags zodat het matcht met (nieuwe omschrijving en kleur)
svn path=/Customer/; revision=57692
This commit is contained in:
69
onces/FMHN/FMHN#74630.sql
Normal file
69
onces/FMHN/FMHN#74630.sql
Normal file
@@ -0,0 +1,69 @@
|
||||
--
|
||||
-- $Id$
|
||||
--
|
||||
-- Met deze once worden enkele zaken ter ondersteuning van de 2e change release van FMH ondersteund.
|
||||
-- FMHN#74630 Markeringen van reserveringen wijzigen. Men wilde de volgorde/duiding van flags aanpassen en dat zijn honderden reserveringen
|
||||
-- LET OP!! Dit moet gelijk gedaan worden met de aanvullende aanpassingen (vertaling/styling), zie FMHN#74630!
|
||||
-- LET OP!! FMHN#74630 moet maar <20><>n keer gedraaid worden!
|
||||
|
||||
|
||||
DEFINE thisfile = 'FMHN#74630.sql'
|
||||
DEFINE dbuser = '^FMHN'
|
||||
|
||||
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 ------
|
||||
|
||||
-- LET OP!! FMHN#74630 moet maar <20><>n keer gedraaid worden!
|
||||
DECLARE
|
||||
CURSOR c IS
|
||||
SELECT res_rsv_ruimte_key, res_rsv_ruimte_flag
|
||||
FROM res_rsv_ruimte
|
||||
WHERE res_rsv_ruimte_verwijder IS NULL
|
||||
AND res_rsv_ruimte_flag IN (1, 2, 3);
|
||||
BEGIN
|
||||
FOR rec IN c
|
||||
LOOP
|
||||
BEGIN
|
||||
UPDATE res_rsv_ruimte r
|
||||
SET r.res_rsv_ruimte_flag = 2
|
||||
WHERE r.res_rsv_ruimte_key = rec.res_rsv_ruimte_key
|
||||
AND rec.res_rsv_ruimte_flag = 1;
|
||||
|
||||
UPDATE res_rsv_ruimte r
|
||||
SET r.res_rsv_ruimte_flag = 3
|
||||
WHERE r.res_rsv_ruimte_key = rec.res_rsv_ruimte_key
|
||||
AND rec.res_rsv_ruimte_flag = 2;
|
||||
|
||||
UPDATE res_rsv_ruimte r
|
||||
SET r.res_rsv_ruimte_flag = 1
|
||||
WHERE r.res_rsv_ruimte_key = rec.res_rsv_ruimte_key
|
||||
AND rec.res_rsv_ruimte_flag = 3;
|
||||
END;
|
||||
END LOOP;
|
||||
END;
|
||||
/
|
||||
|
||||
|
||||
------ 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
|
||||
Reference in New Issue
Block a user