IMPU#87499 -- Herziening medewerkerskoppeling AFAS - deel punten uit overleg doorgevoerd

svn path=/Customer/trunk/; revision=69411
This commit is contained in:
Jos Migo
2025-06-12 14:40:12 +00:00
parent 1f43ffe295
commit d8cdbe028d

View File

@@ -365,6 +365,7 @@ AS
c_prs_afdeling_key_gmk NUMBER (10) := 22; -- Algemene medewerkersafdeling GMK
c_prs_afdeling_key_akros NUMBER (10) := 1101; -- Algemene medewerkersafdeling Akros
c_prs_afdeling_key_combi NUMBER (10) := 1102; -- Algemene medewerkersafdeling Combiwel
c_prs_afdeling_key_impuls NUMBER (10) := 1141; -- Algemene medewerkersafdeling Impu
v_alg_locatie_key NUMBER (10);
v_alg_locatie_code VARCHAR2 (10);
@@ -381,7 +382,7 @@ AS
SELECT fac_imp_file_index,
prs_kenmerk1,
prs_afdeling_naam,
CASE WHEN INSTR(UPPER(prs_perslid_email), '@IMPULS.NL') > 0 THEN 'GMK'
CASE WHEN INSTR(UPPER(prs_perslid_email), '@IMPULS.NL') > 0 THEN 'IMPULS'
WHEN INSTR(UPPER(prs_perslid_email), '@GMK.NL') > 0 THEN 'GMK'
WHEN INSTR(UPPER(prs_perslid_email), '@AKROS-AMSTERDAM.NL') > 0 THEN 'AKROS'
WHEN INSTR(UPPER(prs_perslid_email), '@COMBIWELVOORKINDEREN.NL') > 0 THEN 'COMBIWEL'
@@ -475,7 +476,7 @@ BEGIN
-- Voor locatiemanagers, regiomanagers, teamleider en divisiemanager, geldt dat deze altijd op 'LOCATIE_MAN' moeten komen
-- Voor de overige personen/accounts geldt:
---- De mederwerkers komen uit AFAS en hebben een kostenplaats uit AFAS. Als in Facilitor er een afdeling is aangemaakt met dit gekoppelde kostenplaats_nr dan koppelen we de persoon ook aan die afdeling.
------ indien er op de medewerker geen kostenplaats-afdeling gevonden is, dan wordt deze medewerker onder zijn bedrijf op standaard afdeling gezet: MEDEW_AKROS / MEDEW_COMBIW / MEDEW_GMK
------ indien er op de medewerker geen kostenplaats-afdeling gevonden is, dan wordt deze medewerker onder zijn bedrijf op standaard afdeling gezet: MEDEW_AKROS / MEDEW_COMBIW / MEDEW_IMPULS / MEDEW_GMK
---- De teamaccounts lopen niet via de afas-koppeling. Voor volledigheid, deze komen op eigen TEAM_code onder Eigen bedrijf
FOR rec IN c_afd
@@ -544,6 +545,18 @@ BEGIN
END IF;
IF rec.bedrijf = 'IMPULS'
THEN
UPDATE fac_imp_perslid
SET prs_afdeling_naam =
(SELECT prs_afdeling_upper
FROM prs_afdeling
WHERE prs_afdeling_key = c_prs_afdeling_key_impuls)
WHERE fac_imp_file_index = rec.fac_imp_file_index;
END IF;
IF rec.bedrijf = 'AKROS'
THEN
@@ -744,7 +757,7 @@ IS
CURSOR c_flex -- Voor updaten van de algemene flex-kenmerkvelden op actuele medewerkers
IS
SELECT p.prs_perslid_key, i.prs_kenmerk1, i.prs_kenmerk2, i.prs_kenmerk3, i.prs_kenmerk4, i.prs_kenmerk5, i.prs_kenmerk6, i.prs_perslid_nr,
i.prs_kenmerk7, i.prs_kenmerk8, i.prs_kenmerk9, i.prs_kenmerk10, i.prs_kenmerk11, i.prs_kenmerk12, i.prs_kenmerk13
i.prs_kenmerk7, i.prs_kenmerk8, i.prs_kenmerk9, i.prs_kenmerk10, i.prs_kenmerk11, i.prs_kenmerk12, i.prs_kenmerk13, i.prs_srtperslid_omschrijving
FROM prs_v_aanwezigperslid p, fac_imp_perslid i
WHERE p.prs_perslid_key = i.prs_perslid_key
ORDER BY 1;
@@ -885,7 +898,8 @@ BEGIN
PRS.upsertkenmerk (1083, rec.prs_perslid_key, rec.prs_kenmerk10); -- Leidinggevende_Naam
PRS.upsertkenmerk (1084, rec.prs_perslid_key, rec.prs_kenmerk11); -- Werkgever
PRS.upsertkenmerk (1085, rec.prs_perslid_key, rec.prs_kenmerk12); -- Naam_werkgever
PRS.upsertkenmerk (1086, rec.prs_perslid_key, rec.prs_kenmerk13); -- Mobiel_werk
PRS.upsertkenmerk (1086, rec.prs_perslid_key, rec.prs_kenmerk13); -- Mobiel_werk
PRS.upsertkenmerk (1100, rec.prs_perslid_key, rec.prs_srtperslid_omschrijving); -- Functie_afas
END;
END LOOP;
@@ -1124,13 +1138,9 @@ CREATE OR REPLACE VIEW IMPU_V_ALG_ONROERENDGOED
KDV,
VO,
BSO,
--
VERDIEPING,
RUIMTENR,
RUIMTE_OMSCHRIJVING,
RUIMTEFUNCTIE,
BVO_M2,
VLOERSOORT
WELZIJN,
SSC,
LOCATIE_STATUS
)
AS
SELECT d.alg_district_omschrijving,
@@ -1140,6 +1150,7 @@ AS
v.alg_gebouw_code || ' - ' || v.alg_gebouw_naam
gebouw,
km.locatiemanager,
km.locatiemanager_2,
km.regiomanager,
km.contact_toelichting,
km.gebruiksrecht,
@@ -1150,18 +1161,19 @@ AS
km.kdv,
km.vo,
km.bso,
v.alg_verdieping_omschrijving || ' - ' || v.alg_verdieping_code
verdieping,
v.alg_ruimte_nr,
v.alg_ruimte_omschrijving,
sr.alg_srtruimte_omschrijving,
r.alg_ruimte_bruto_vloeropp,
flx.getdomeinwaarde(25, flx.getflex('ALG', 1040, r.alg_ruimte_key, 'R')) vloersoort
km.welzijn,
km.ssc,
CASE WHEN l.alg_locatie_vervaldatum IS NULL OR TRUNC(l.alg_locatie_vervaldatum) > TRUNC(SYSDATE)
THEN 'actueel'
ELSE 'oud'
END
locatie_status
FROM alg_v_onroerendgoed_gegevens v,
alg_locatie l,
alg_district d,
(SELECT l.alg_locatie_key,
flx.getdomeinwaarde(2, flx.getflex('ALG',1016, l.alg_locatie_key,'L')) locatiemanager,
flx.getdomeinwaarde(2, flx.getflex('ALG',1180, l.alg_locatie_key,'L')) locatiemanager_2,
flx.getdomeinwaarde(2, flx.getflex('ALG',1018, l.alg_locatie_key,'L')) regiomanager,
flx.getflex('ALG',1019, l.alg_locatie_key,'L') contact_toelichting,
flx.getdomeinwaarde(1,flx.getflex('ALG',1005, l.alg_locatie_key,'L')) gebruiksrecht,
@@ -1171,17 +1183,15 @@ AS
flx.getflex('ALG',1011, l.alg_locatie_key,'L') eigenaarschap_toelichting,
flx.getflex('ALG',1001, l.alg_locatie_key,'L') KDV,
flx.getflex('ALG',1002, l.alg_locatie_key,'L') VO,
flx.getflex('ALG',1003, l.alg_locatie_key,'L') BSO
FROM alg_locatie l ) km,
alg_ruimte r,
alg_srtruimte sr
flx.getflex('ALG',1003, l.alg_locatie_key,'L') BSO,
flx.getflex('ALG',1100, l.alg_locatie_key,'L') WELZIJN,
flx.getflex('ALG',1160, l.alg_locatie_key,'L') SSC
FROM alg_locatie l ) km
WHERE v.alg_locatie_key = l.alg_locatie_key
AND l.alg_district_key = d.alg_district_key
AND v.alg_type IN ('R')
AND v.alg_type IN ('G')
AND v.alg_locatie_key = km.alg_locatie_key
AND v.alg_ruimte_key = r.alg_ruimte_key AND r.alg_ruimte_verwijder IS NULL
AND r.alg_srtruimte_key = sr.alg_srtruimte_key (+)
ORDER BY d.alg_district_omschrijving, l.alg_locatie_code, v.alg_gebouw_code, v.alg_ruimte_nr
ORDER BY d.alg_district_omschrijving, l.alg_locatie_code, v.alg_gebouw_code
;
CREATE OR REPLACE VIEW impu_v_rap_opdrachten_intern