163 lines
5.4 KiB
SQL
163 lines
5.4 KiB
SQL
/* Formatted on 3/11/2022 08:52:26 (QP5 v5.336) */
|
|
--
|
|
-- $Id$
|
|
--
|
|
-- PNBR#74937 Wijzigingen objecten - koppeling Facilitor en Topdesk
|
|
-- Objecten op inactief zetten
|
|
|
|
DEFINE thisfile = 'PNBR#74937.SQL'
|
|
DEFINE dbuser = '^PNBR'
|
|
|
|
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 ------
|
|
|
|
DECLARE
|
|
-- Onderstaande cursor bevat alle object keys die volgens OGD vervallen zijn
|
|
CURSOR c_deel IS
|
|
SELECT d.ins_deel_key --- Edge switches
|
|
FROM INS_DEEL d
|
|
WHERE d.ins_deel_key IN (102481,
|
|
102483,
|
|
102482,
|
|
102316,
|
|
96351,
|
|
104588,
|
|
96352,
|
|
96353,
|
|
96355,
|
|
104583,
|
|
96356,
|
|
96357,
|
|
104585,
|
|
104603,
|
|
96358,
|
|
96359,
|
|
104604,
|
|
104606,
|
|
96360,
|
|
96361,
|
|
104587,
|
|
104592,
|
|
96362,
|
|
96375,
|
|
104596,
|
|
96376,
|
|
96377,
|
|
96378,
|
|
104600,
|
|
96379,
|
|
96380,
|
|
96381,
|
|
104594,
|
|
96382,
|
|
96383,
|
|
96384,
|
|
104586,
|
|
96395,
|
|
96396,
|
|
96385,
|
|
96386,
|
|
96387,
|
|
96388,
|
|
96389,
|
|
96391,
|
|
104591,
|
|
96392,
|
|
96393,
|
|
104602,
|
|
104607,
|
|
96397,
|
|
96398,
|
|
96399,
|
|
96400,
|
|
96401,
|
|
104601,
|
|
96402,
|
|
96404,
|
|
96405)
|
|
UNION ALL
|
|
SELECT d.ins_deel_key --- virtuele server
|
|
FROM INS_DEEL d
|
|
WHERE d.ins_deel_key IN (96552,
|
|
96581,
|
|
96464,
|
|
96633,
|
|
96634,
|
|
96635,
|
|
96636,
|
|
96637,
|
|
96638,
|
|
102781,
|
|
103464,
|
|
103461,
|
|
103463,
|
|
103465,
|
|
103462,
|
|
104021,
|
|
104742,
|
|
104752,
|
|
96682,
|
|
96695,
|
|
96700,
|
|
110185,
|
|
110183,
|
|
110181,
|
|
110184,
|
|
110182)
|
|
UNION ALL
|
|
SELECT d.ins_deel_key --- WLC
|
|
FROM INS_DEEL d
|
|
WHERE d.ins_deel_key = 95761;
|
|
BEGIN
|
|
FOR rec IN c_deel
|
|
LOOP
|
|
BEGIN
|
|
UPDATE ins_deel d
|
|
SET d.ins_deel_actief = 0
|
|
WHERE d.ins_deel_key = rec.ins_deel_key;
|
|
|
|
fac.trackaction (
|
|
'INSUPD',
|
|
rec.ins_deel_key,
|
|
NULL,
|
|
NULL,
|
|
'Object op inactief gezet (zie Logcentre PNBR#74937)');
|
|
|
|
COMMIT;
|
|
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 |