Files
Customer/onces/NOUR/FCLT#58339_2.SQL
2019-08-22 11:20:04 +00:00

98 lines
4.1 KiB
SQL

--
-- $Id$
--
-- Omzetten linkjes naar documenten van Akzo Shared Folder naar Nouryon Sharepoint omgeving
DEFINE thisfile = 'FCLT#58339_2.SQL'
DEFINE dbuser = '^NOUR'
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;
SET DEFINE OFF
------ payload begin ------
--- STAP 1: replace \ door /
UPDATE ins_kenmerkdeel kd
SET ins_kenmerkdeel_waarde = REPLACE (ins_kenmerkdeel_waarde, '\', '/')
WHERE kd.ins_kenmerkdeel_key IN
(SELECT kd.ins_kenmerkdeel_key
FROM ins_srtkenmerk sk,
ins_kenmerk k,
ins_kenmerkdeel kd,
INS_V_DEEL_GEGEVENS d,
ins_srtdeel sd
WHERE sk.ins_srtkenmerk_kenmerktype = 'X'
AND k.ins_srtkenmerk_key = sk.ins_srtkenmerk_key
AND kd.ins_kenmerk_key = k.ins_kenmerk_key
AND kd.ins_deel_key = d.ins_deel_key
AND d.ins_srtdeel_key = sd.ins_srtdeel_key
AND sk.ins_srtkenmerk_verwijder IS NULL
AND kd.ins_kenmerkdeel_verwijder IS NULL
AND ins_deel_vervaldatum IS NULL
AND kd.ins_kenmerkdeel_waarde LIKE '%\%'
AND UPPER (kd.ins_kenmerkdeel_waarde) <> 'N.V.T.'
AND UPPER (kd.ins_kenmerkdeel_waarde) <> '-');
COMMIT;
--- STAP 2: vul de url aan met https://d60c.sharepoint.com/sites/SC00025T12361/Shared%20Documents/
UPDATE ins_kenmerkdeel kd
SET kd.ins_kenmerkdeel_waarde =
'https://d60c.sharepoint.com/sites/SC00025T12361/Shared%20Documents'
|| kd.ins_kenmerkdeel_waarde
WHERE kd.ins_kenmerkdeel_key NOT IN (943085, 943086)
AND kd.ins_kenmerkdeel_key IN
(SELECT kd.ins_kenmerkdeel_key
FROM ins_srtkenmerk sk,
ins_kenmerk k,
ins_kenmerkdeel kd,
INS_V_DEEL_GEGEVENS d,
ins_srtdeel sd
WHERE sk.ins_srtkenmerk_kenmerktype = 'X'
AND k.ins_srtkenmerk_key = sk.ins_srtkenmerk_key
AND kd.ins_kenmerk_key = k.ins_kenmerk_key
AND kd.ins_deel_key = d.ins_deel_key
AND d.ins_srtdeel_key = sd.ins_srtdeel_key
AND sk.ins_srtkenmerk_verwijder IS NULL
AND kd.ins_kenmerkdeel_verwijder IS NULL
AND ins_deel_vervaldatum IS NULL
AND kd.ins_kenmerkdeel_waarde LIKE '%/%'
AND UPPER (kd.ins_kenmerkdeel_waarde) <> 'N.V.T.'
AND UPPER (kd.ins_kenmerkdeel_waarde) <> '-');
-- Stap 3: de linkjes naar werkvergunningen moeten omgezet worden naar Sharepoint
-- Oude url: ms-excel:ofe|u|http://facilitor.akzonobel.intra:81/PTW-236390.xlsm
-- Nieuwe url: ms-excel:ofe|u|https://d60c.sharepoint.com/sites/SC00025T12361/Staging/PTW/PTW-99999.xlsm
UPDATE mld_kenmerkmelding
SET mld_kenmerkmelding_waarde =
REPLACE (mld_kenmerkmelding_waarde,
'facilitor.akzonobel.intra:81',
'd60c.sharepoint.com/sites/SC00025T12361/Documenten/PTW')
WHERE mld_kenmerkmelding_key IN
(SELECT km.mld_kenmerkmelding_key
FROM mld_srtkenmerk sk, mld_kenmerk k, mld_kenmerkmelding km
WHERE sk.mld_srtkenmerk_upper = 'WERKVERGUNNING'
AND sk.mld_srtkenmerk_key = k.mld_srtkenmerk_key
AND k.mld_kenmerk_key = km.mld_kenmerk_key);
COMMIT;
------ 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