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

YKPN#62361 -- Inrichting Corona werkplekken.

Browse Source 
svn path=/Customer/; revision=47025
This commit is contained in:
Arthur Egberink
2020-06-02 11:20:03 +00:00
parent 8f21a6c2a4
commit 2ea6e5b9c2
1 changed files with 178 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

178
onces/YKPN/YKPN#62361_3.sql Normal file
View File

@@ -0,0 +1,178 @@
--
-- $Id$
--
-- Mensen handmatig inlezen aangezien koppeling niet werkt.
DEFINE thisfile = 'YKPN#62361.sql'
DEFINE dbuser = '^YKPN'
DEFINE custid = 'YKPN'
SET ECHO ON
SET DEFINE ON
SET serveroutput ON
COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
WHENEVER SQLERROR EXIT;
SELECT adm.scriptspoolfile('&dbuser', '&thisfile') AS fcltlogfile FROM DUAL;
WHENEVER SQLERROR CONTINUE;
SPOOL &fcltlogfile
SET DEFINE OFF
------ payload begin ------
/* Formatted on 29-5-2020 00:09:26 (QP5 v5.336) */
DROP TABLE tmp_imp_perslid;
CREATE TABLE tmp_imp_perslid
(
prs_perslid_oslogin VARCHAR2 (30),
prs_perslid_nr VARCHAR2 (16),
prs_perslid_voornaam VARCHAR2 (30),
prs_perslid_tussenvoegsel VARCHAR2 (15),
prs_perslid_naam VARCHAR2 (60),
prs_perslid_email VARCHAR2 (200)
);
SET DEFINE OFF;
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('kurto502', 'P37820', 'Beyza', 'Kurtoglu', 'beyza.kurtoglu@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('basar503', 'P37788', 'Tugcem', 'Basaran', 'tugcem.basaran@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('fawzi500', 'P38008', 'Annouar', 'Fawzi', 'annouar.fawzi@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('dacca500', 'P37971', 'charbel', 'Daccache', 'charbel.daccache@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('moham532', 'P37995', 'Siwan', 'Mohammed', 'siwan.mohammed@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('yalci503', 'P36303', 'Melike', 'Yalci', 'melike.tyalci@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('arend516', 'P38010', 'Igor', 'Arends', 'igor.arends@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('kits502', 'P38340', 'Isabel', 'Kits', 'isabel.kits@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_TUSSENVOEGSEL, PRS_PERSLID_NAAM,
PRS_PERSLID_EMAIL)
Values
('duist506', 'P38339', 'Theunis', 'van', 'Duist',
'teun.vanduist@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('weege500', 'P38038', 'Sascha', 'Weegerink', 'sascha.weegerink@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('houri502', 'P38034', 'Melika', 'Hourijafari', 'melika.hourijafari@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('sarig502', 'P38033', 'Selin', 'Sarigul', 'selin.sarigul@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('kleef509', 'P38341', 'Anne', 'Kleef', 'marijn.kleef@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('khama501', 'P38344', 'Adam', 'Khamal', 'adamkhamal@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('veens505', 'P38376', 'Virramae', 'Veenstra', 'virramae.veenstra@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('nyali500', 'P36134', 'Salim', 'Nyali', 'salim.nyali@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_NAAM, PRS_PERSLID_EMAIL)
Values
('lopes505', 'P36183', 'Angelo', 'Lopes', 'angelolopes@kpn.com');
Insert into TMP_IMP_PERSLID
(PRS_PERSLID_OSLOGIN, PRS_PERSLID_NR, PRS_PERSLID_VOORNAAM, PRS_PERSLID_TUSSENVOEGSEL, PRS_PERSLID_NAAM,
PRS_PERSLID_EMAIL)
Values
('hees505', 'P36172', 'Micha', 'van', 'Hees',
'micha.vanhees@kpn.com');
COMMIT;
DECLARE
CURSOR c IS SELECT * FROM tmp_imp_perslid;
v_perslid_key NUMBER;
BEGIN
-- srtperslid_key = 1 onbekend
-- afdeling_key = 1 onbekend
FOR rec IN c
LOOP
BEGIN
INSERT INTO prs_perslid (prs_perslid_module,
prs_srtperslid_key,
prs_afdeling_key,
prs_perslid_naam,
prs_perslid_tussenvoegsel,
prs_perslid_voornaam,
prs_perslid_nr,
prs_perslid_oslogin,
prs_perslid_email)
VALUES ('PRS',
1,
1,
rec.prs_perslid_naam,
rec.prs_perslid_tussenvoegsel,
rec.prs_perslid_voornaam,
rec.prs_perslid_nr,
rec.prs_perslid_oslogin,
rec.prs_perslid_email)
RETURNING prs_perslid_key
INTO v_perslid_key;
-- alg_ruimte_key = 26463 onbekend.
PRS.movetoruimte (v_perslid_key, 26463, 'A');
fac.writelog ('TMP_IMP_PERSLID',
'I',
rec.prs_perslid_oslogin || ' aangemaakt.',
'');
EXCEPTION
WHEN OTHERS
THEN
fac.writelog ('TMP_IMP_PERSLID',
'E',
rec.prs_perslid_oslogin || ' bestaat al?',
'');
END;
END LOOP;
COMMIT;
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