ARBO#65778 -- Nieuwe organisatiestructuur

svn path=/Customer/trunk/; revision=50179
This commit is contained in:
Arthur Egberink
2021-03-04 15:44:23 +00:00
parent 51888ac5a4
commit 33b447c96a

View File

@@ -33,7 +33,7 @@ AS
v_errorhint VARCHAR2 (200);
BEGIN
v_seq_of_columns := '0;0;0;0;0;0;7;11;0;10;'
v_seq_of_columns := '0;0;0;0;0;0;10;14;0;13;'
-- v_alg_locatie_code 1
-- v_alg_gebouw_code 2
-- v_alg_verdieping_volgnr 3
@@ -44,7 +44,7 @@ BEGIN
-- v_prs_perslid_naam 8
-- v_prs_perslid_tussenvoegsel 9
-- v_prs_perslid_voornaam 10
|| '0;0;0;0;0;0;0;13;0;1;'
|| '0;0;0;0;0;0;0;16;0;1;'
-- v_prs_perslid_voorletters 11
-- v_prs_perslid_partner_naam 12
-- v_prs_perslid_partner_tussenv 13
@@ -58,7 +58,7 @@ BEGIN
-- v_prs_perslid_email 18
-- v_prs_perslid_dienstverband 19
-- v_prs_perslid_nr 20
|| '12;1;0;0;0;0;2;3;11;4;'
|| '15;1;0;0;0;0;2;3;14;4;'
-- v_prs_srtperslid_omschrijving 21
-- v_prs_perslid_oslogin 22
-- v_prs_perslid_wachtwoord 23
@@ -69,9 +69,9 @@ BEGIN
-- v_prs_kenmerk2 28
-- v_prs_kenmerk3 29
-- v_prs_kenmerk4 30
|| '6;7;8;9;5;14;0;0;0;0;'
|| '9;10;11;12;8;17;0;0;0;0;'
|| '0;0;0;0;0;0';
prs.import_perslid(p_import_key, v_seq_of_columns, 'PNR;Niveau 2;Niveau 3;Niveau 4;Afdelingsnummer;Afdeling;Kostenplaats.Code;KPL_VERKORT;Kostenplaats;Roepnaam;Werknemer;Functie;Email%');
prs.import_perslid(p_import_key, v_seq_of_columns, 'PNR;niveau 2;niveau 3;niveau 4;niveau 5;niveau 6;niveau 7;Afdelingsnummer;Afdeling;Kostenplaats.Code;KPL_VERKORT;Kostenplaats;roepnaam;werknemer;Functie;Email%');
-- Uitleg van de kenmerkvelden:
-- kenmerk1: bedrijf (hoogste niveau afdeling voor ARBO
@@ -107,6 +107,9 @@ BEGIN
prs_perslid_oslogin = TO_CHAR(prs_perslid_oslogin, 'FM00000')
WHERE length(prs_perslid_nr) < 5;
-- Als afdelingsniveau 3 leeg is vullen we deze met afdelingsniveau 2
UPDATE fac_imp_perslid SET prs_kenmerk2 = prs_kenmerk1 WHERE prs_kenmerk2 IS NULL;
-- De afdeling op niveau 2 is de omschrijving van de kostenplaats. Voor algemene afdelingen wordt er
-- een prefix voor geplaatst.
UPDATE fac_imp_perslid SET prs_kenmerk11 = prs_kenmerk8,
@@ -133,12 +136,15 @@ BEGIN
'Mensely B.V.', 'MENS ')
|| prs_kenmerk8
WHERE prs_kenmerk7 IN ('BB',
'BO',
'CO',
'DIR',
'FIN',
'FZ',
'HR',
'IO',
'JZ',
'KW',
'MAR',
'RD',
'TD',