Files
Customer/onces/BLCC/BLCC#75509.sql
Maarten van der Heide a2825d5e52 BLCC#75509 Corrigeren fout bij splitsen SLA Managed Connectivity contracten
svn path=/Customer/; revision=58104
2022-11-23 16:14:17 +00:00

93 lines
2.7 KiB
SQL

--
-- $Id$
--
-- Customer specific once-script BLCC#75509.SQL.
DEFINE thisfile = 'BLCC#75509.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#75509
-- Einddatum op SLA Managed Connectivity contracten van 21-11-2022 naar 31-12-2022!
SET SERVEROUTPUT ON size 1000000;
DECLARE
CURSOR c
IS
SELECT cnt_contract_key
FROM cnt_v_aanwezigcontract
WHERE ins_discipline_key = 2185 -- SLA Managed Connectivity
AND TO_CHAR (cnt_contract_looptijd_tot, 'dd-mm-yyyy') = '21-11-2022'
ORDER BY cnt_contract_key;
v_count NUMBER := 0;
BEGIN
FOR rec IN c
LOOP
BEGIN
UPDATE cnt_contract
SET cnt_contract_looptijd_tot = fac.safe_to_date ('31-12-2022', 'dd-mm-yyyy')
WHERE cnt_contract_key = rec.cnt_contract_key;
fac.trackaction ('CNTUPD', rec.cnt_contract_key, NULL, NULL, 'Einddatum gewijzigd naar 31-12-2022');
v_count := v_count + 1;
END;
END LOOP;
DBMS_OUTPUT.PUT_LINE ('S: ' || TO_CHAR (v_count) || ' SLA Managed Connectivity contracten gewijzigd');
END;
/
-- Ingangsdatum op SLA Managed Connectivity contracten van 22-11-2022 naar 01-01-2023!
SET SERVEROUTPUT ON size 1000000;
DECLARE
CURSOR c
IS
SELECT cnt_contract_key
FROM cnt_v_aanwezigcontract
WHERE ins_discipline_key = 2185 -- SLA Managed Connectivity
AND TO_CHAR (cnt_contract_looptijd_van, 'dd-mm-yyyy') = '22-11-2022'
ORDER BY cnt_contract_key;
v_count NUMBER := 0;
BEGIN
FOR rec IN c
LOOP
BEGIN
UPDATE cnt_contract
SET cnt_contract_looptijd_van = fac.safe_to_date ('01-01-2023', 'dd-mm-yyyy')
WHERE cnt_contract_key = rec.cnt_contract_key;
fac.trackaction ('CNTUPD', rec.cnt_contract_key, NULL, NULL, 'Ingangsdatum gewijzigd naar 01-01-2023');
v_count := v_count + 1;
END;
END LOOP;
DBMS_OUTPUT.PUT_LINE ('S: ' || TO_CHAR (v_count) || ' SLA Managed Connectivity contracten 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