admin/Customer
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

BLCC#81064 Indexatie/Gebouwkenmerken vermenigvuldigen met 1,044

Browse Source 
svn path=/Customer/; revision=62663
This commit is contained in:
Maarten van der Heide
2023-11-22 15:46:18 +00:00
parent 1700440608
commit fb529dd278
1 changed files with 68 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

68
onces/BLCC/BLCC#81064_2.sql Normal file
View File

@@ -0,0 +1,68 @@
--
-- $Id$
--
-- Customer specific once-script BLCC#81064.SQL.
DEFINE thisfile = 'BLCC#81064.sql'
DEFINE dbuser = '^BLCC'
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 ------
-- BLCC#81064
-- Graag ook nog de HKLOT FES tarieven x 1.044 (4,4%).
SET SERVEROUTPUT ON size 1000000;
DECLARE
CURSOR c
IS
SELECT DISTINCT ok.alg_onrgoed_key
FROM alg_onrgoedkenmerk ok
WHERE ok.alg_onrgoedkenmerk_verwijder IS NULL
AND ok.alg_onrgoed_niveau = 'G'
AND ok.alg_kenmerk_key IN (1220, 1221, 1222, 1223, 1224, 1245) -- FES Subsidie L/H/K/O/T/C
AND EXISTS (SELECT 1 FROM alg_v_aanweziggebouw WHERE alg_gebouw_key = ok.alg_onrgoed_key)
ORDER BY ok.alg_onrgoed_key;
v_count NUMBER := 0;
BEGIN
FOR rec IN c
LOOP
BEGIN
UPDATE alg_onrgoedkenmerk
SET alg_onrgoedkenmerk_waarde = ROUND (1.044 * alg_onrgoedkenmerk_waarde, 2)
WHERE alg_onrgoedkenmerk_verwijder IS NULL
AND alg_onrgoed_niveau = 'G'
AND alg_kenmerk_key IN (1220, 1221, 1222, 1223, 1224, 1245) -- FES Subsidie L/H/K/O/T/C
AND alg_onrgoed_key = rec.alg_onrgoed_key;
fac.trackaction ('ALGGUP', rec.alg_onrgoed_key, NULL, NULL, 'FES-tarieven ge<67>ndexeerd (4,4%)');
v_count := v_count + 1;
END;
END LOOP;
DBMS_OUTPUT.PUT_LINE('S: ' || TO_CHAR (v_count) || ' FES-tarieven gewijzigd');
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