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

DRIE#57793 Login werd door de generieke import even leeggemaakt en daardoor werden ook de sessies gewist.

Browse Source 
svn path=/Customer/trunk/; revision=42743
This commit is contained in:
Sander Schepers
2019-05-28 09:14:03 +00:00
parent fcd95f4e73
commit 97a578f28e
1 changed files with 29 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

52
DRIE/drie.sql
View File

@@ -94,26 +94,32 @@ AS
CREATE OR REPLACE PROCEDURE drie_import_perslid (p_import_key IN NUMBER)
AS
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
v_errormsg VARCHAR2 (400);
v_errorhint VARCHAR2 (400);
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
v_errormsg VARCHAR2 (400);
v_errorhint VARCHAR2 (400);
BEGIN
v_errorhint := 'Generieke import';
-- de sequence array staat beschreven in PRS_PAC.SRC bij de prs.import_perslid proc
prs.import_perslid (p_import_key,
'0;0;0;0;0;0;6;2;0;0;' ||
'0;0;0;0;17;0;0;3;0;1;' ||
'10;22;0;0;0;0;5;4;7;8;'||
'9;13;18;19;14;15;16;20;12;11;'||
'0;0;0;0;0;0',
'"Mdw.";"Medewerker";"Mail_werk";"Loc";"Locatie";"OE";"Organisatorische_eenheid";"Kostenplaats";"Funct";"Functie";"Roepnaam";"Voorvoegsel";"Geboortenaam";"Naamgebruik_code";"Voorvoegsel_partner";"Geb.naam_partner";"Geslacht";"Begindatum_contract";"Einddatum_contract";"UPN";"Login"'
);
prs.import_perslid (
p_import_key,
'0;0;0;0;0;0;6;2;0;0;'
|| '0;0;0;0;17;0;0;3;0;1;'
|| '10;22;0;0;0;0;5;4;7;8;'
|| '9;13;18;19;14;15;16;20;12;11;'
|| '0;0;0;0;0;0',
'"Mdw.";"Medewerker";"Mail_werk";"Loc";"Locatie";"OE";"Organisatorische_eenheid";"Kostenplaats";"Funct";"Functie";"Roepnaam";"Voorvoegsel";"Geboortenaam";"Naamgebruik_code";"Voorvoegsel_partner";"Geb.naam_partner";"Geslacht";"Begindatum_contract";"Einddatum_contract";"UPN";"Login"');
v_errorhint := 'Klantspecifieke aanpassingen import';
-- Hier al login vullen, omdat deze anders wordt leeggemaakt en de sessie daarmee ook. Wanneer sessies leeg worden gemaakt, moet men met Mobile steeds opnieuw inloggen (57793)
UPDATE fac_imp_perslid
SET prs_perslid_oslogin =
SUBSTR (prs_perslid_email,
1,
INSTR (prs_perslid_email, '@') - 1);
v_errorhint := 'Klantspecifieke aanpassingen import';
-- Klantspecifieke aanpassingen
drie_post_import_perslid(p_import_key);
drie_post_import_perslid (p_import_key);
COMMIT;
EXCEPTION
@@ -122,7 +128,10 @@ EXCEPTION
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 100);
v_errormsg := 'Error ' || oracle_err_num || '/' || oracle_err_mes;
fac.imp_writelog (p_import_key, 'E', v_errormsg, v_errorhint);
fac.imp_writelog (p_import_key,
'E',
v_errormsg,
v_errorhint);
END drie_import_perslid;
/
@@ -245,6 +254,7 @@ IS
-- Alle personen in de import moeten inlognaam krijgen en extern id tbv inloggen (via SAML)
-- Login naam niet meer ivm 57793
CURSOR clogin
IS
SELECT i.prs_perslid_naam,
@@ -288,18 +298,15 @@ IS
BEGIN
-- Login naam: emailadres; Extern ID: imp_kenmerk12 = UPN (dat wordt meegegeven voor uniek attribuut tbv SAML)
-- Login naam niet meer ivm 57793
FOR rec IN clogin
LOOP
BEGIN
v_aanduiding := rec.prs_perslid_naam;
v_errorhint := 'Loginnaam & externid updaten tbv login - ' || rec.prs_perslid_naam;
v_errorhint := 'Externid updaten tbv login - ' || rec.prs_perslid_naam;
UPDATE prs_perslid p
SET p.prs_perslid_oslogin =
SUBSTR (rec.prs_perslid_email,
1,
INSTR (rec.prs_perslid_email, '@') - 1),
p.prs_perslid_externid = rec.prs_kenmerk12
SET p.prs_perslid_externid = rec.prs_kenmerk12
WHERE rec.prs_perslid_key = p.prs_perslid_key
AND p.prs_perslid_verwijder IS NULL;
@@ -407,7 +414,6 @@ BEGIN
END drie_post_update_perslid;
/
------ payload end ------
SET DEFINE OFF