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

ASFC#34371: Start en stopmoment bij schoonmaak via inspecties kunnen vastleggen.

Browse Source 
svn path=/Database/trunk/; revision=28512
This commit is contained in:
Maykel Geerdink
2016-03-17 11:36:51 +00:00
parent f1f8e183b1
commit a382ad0979
2 changed files with 55 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

39
FAC/FAC_PAC.SRC
View File

@@ -2839,6 +2839,7 @@ CREATE OR REPLACE PACKAGE BODY fac AS
lprs_bedrijf_key prs_bedrijf.prs_bedrijf_key%TYPE;
lmldbehandelaar mld_melding.mld_melding_behandelaar_key%TYPE;
lafs_key bez_afspraak.bez_afspraak_key%TYPE;
lins_deel_ley ins_deel.ins_deel_key%TYPE;
BEGIN
-- Het gaat om een notificatie bij een entiteit prefkey,
-- waarvan het type alleen nog moet worden bepaald via
@@ -3501,6 +3502,44 @@ CREATE OR REPLACE PACKAGE BODY fac AS
NULL;
END;
END IF;
WHEN lxmlnode = 'controle'
THEN
IF ptracking_oms IS NULL
THEN
bericht := ins.contrsprintf (loms, prefkey);
END IF;
-- Bij Controle, Vervanging of Certificering sturen we een notificatie naar diegene die de Controle, Vervanging of Certificering heeft uitgevoerd.
SELECT prs_perslid_key, ins_deel_key
INTO lreceiver, lins_deel_ley
FROM ins_deelsrtcontrole
WHERE ins_deelsrtcontrole_key = prefkey;
-- Afzender via ins_deel.
BEGIN
SELECT MAX (ins_discipline_email)
INTO lsender
FROM ins_tab_discipline d,
ins_deel dl,
ins_srtdeel sd,
ins_srtgroep sg
WHERE dl.ins_srtdeel_key = sd.ins_srtdeel_key
AND sd.ins_srtgroep_key = sg.ins_srtgroep_key
AND sg.ins_discipline_key = d.ins_discipline_key
AND dl.ins_deel_key = lins_deel_ley;
IF lsender IS NULL
THEN
SELECT l.alg_locatie_email
INTO lsender
FROM alg_locatie l
WHERE l.alg_locatie_key = lalglocatiekey;
END IF;
EXCEPTION
WHEN NO_DATA_FOUND
THEN
NULL;
END;
WHEN lxmlnode = 'contract'
THEN
IF ptracking_oms IS NULL