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

FCLT#65380: Implementatie AkzoNobel Sassenheim en A'hem/A'dam naar Saas, view met badges aangepast

Browse Source 
svn path=/Customer/trunk/; revision=50774
This commit is contained in:
Suzan Wiegerinck
2021-04-13 10:29:38 +00:00
parent b0a60958ed
commit 56da7733e6
1 changed files with 21 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

44
AKZO/AKZO.sql
View File

@@ -219,18 +219,6 @@ AS
sd.ins_srtdeel_key
AND km.mld_melding_key = p_melding_key;
v_errormsg := 'Fout bepalen bedrijf';
--- bedrijf bepalen, kenmerk in de melding
IF v_srtdeel_code <> 'AN-SSH'
THEN
SELECT km.mld_kenmerkmelding_waarde
INTO v_bedrijf
FROM mld_kenmerkmelding km
WHERE km.mld_kenmerk_key = 124
AND km.mld_melding_key = p_melding_key;
END IF;
v_errormsg := 'Fout bepalen ingangsdatum badge';
--- ingangsdatum badge bepalen, kenmerk in de melding
@@ -290,12 +278,12 @@ AS
--- voor wie wordt de pas aangevraagd?
SELECT p.prs_perslid_key
INTO v_pas_voor
FROM mld_kenmerkmelding km, prs_perslid p
WHERE km.mld_kenmerk_key = 61
AND km.mld_kenmerkmelding_waarde =
p.prs_perslid_key
AND km.mld_melding_key = p_melding_key;
INTO v_pas_voor
FROM mld_kenmerkmelding km, prs_perslid p
WHERE km.mld_kenmerk_key = 61
AND km.mld_kenmerkmelding_waarde =
p.prs_perslid_key
AND km.mld_melding_key = p_melding_key;
v_errormsg := 'Fout aanmaken pas';
@@ -330,9 +318,19 @@ AS
rec.prs_perslid_key_voor);
--- bij een tijdelijke badge is bedrijf verplicht
--- bedrijf bepalen, kenmerk in de melding
SELECT COALESCE (km.prs_kenmerklink_waarde, 'AN SSH')
INTO v_bedrijf
FROM prs_perslid p,
(SELECT km.prs_kenmerklink_waarde, km.prs_link_key
FROM prs_kenmerklink km
WHERE km.prs_kenmerklink_key = 1020) km
WHERE km.prs_link_key(+) = p.prs_perslid_key
AND p.prs_perslid_key = v_pas_voor;
akzo.upsert_inskenmerk (v_deel_key,
41,
COALESCE (v_bedrijf, 'AN SSH'));
v_bedrijf);
-- en dan mag de melding direct weer afgesloten worden
UPDATE mld_melding m
@@ -478,7 +476,8 @@ AS
BEGIN
FOR rec IN c
LOOP
v_errormsg := 'Fout opschonen autorisatie ' || rec.prs_perslid_key;
v_errormsg :=
'Fout opschonen autorisatie ' || rec.prs_perslid_key;
DELETE fac_gebruikersgroep g
WHERE g.fac_groep_key = 1
@@ -572,12 +571,11 @@ CREATE OR REPLACE FORCE VIEW AKZO_V_RAP_AANVR_BADGE
RUIMTE_CODE,
RUIMTE_NAAM
)
BEQUEATH DEFINER
AS
SELECT UPPER (sd.ins_srtdeel_eenheid) persontype,
SELECT UPPER (sd.ins_srtdeel_eenheid) persontype,
ins_srtdeel_nr displaytype_code,
ins_srtdeel_omschrijving displaytype_naam,
p.prs_perslid_nr personeelsnummer,
d.ins_deel_omschrijving personeelsnummer,
p.prs_perslid_voornaam roepnaam,
p.prs_perslid_voorletters voorletters,
p.prs_perslid_tussenvoegsel tussenvoegsel,