FBEA#68658 Implementatie Facilitair Bedrijf Eemland
svn path=/Customer/trunk/; revision=55235
This commit is contained in:
@@ -60,6 +60,7 @@ BEGIN
|
||||
INTO sender
|
||||
FROM prs_perslid p
|
||||
WHERE UPPER (prs_perslid_email) = UPPER (pfrom);
|
||||
|
||||
-- Geen bekende afzender --> _FACILITOR
|
||||
ELSE
|
||||
SELECT prs_perslid_key
|
||||
@@ -69,22 +70,28 @@ BEGIN
|
||||
END IF;
|
||||
|
||||
CASE
|
||||
-- Op basis van het mailadres bepalen we de locatie waar de melding voor bedoeld is
|
||||
-- 1 Eemhuis
|
||||
-- 2 Bibliotheek Bunschoten
|
||||
-- 3 Bibliotheek Hoogland
|
||||
-- 4 ICOON
|
||||
-- 5 Bibliotheek Baarn
|
||||
-- 6 SIDK
|
||||
-- 7 Bibliotheek Leusden
|
||||
-- 8 Bibliotheek Woudenberg
|
||||
-- Op basis van het mailadres bepalen we het gebouw waar de melding voor bedoeld is
|
||||
-- Voorlopig doen we dat alleen voor Het Eemhuis en ICOON
|
||||
-- 11 Eemhuis
|
||||
-- 2 ICOON
|
||||
-- 3 Bibliotheek Baarn
|
||||
-- 4 Bibliotheek Bunschoten
|
||||
-- 5 Bibliotheek Hoogland
|
||||
-- 6 Scholen in de Kunst Hoogland
|
||||
-- 7 Bibliotheek Leusden Aanbouw
|
||||
-- 8 Scholen in de Kunst Leusden
|
||||
-- 9 Scholen in de Kunst Soest
|
||||
-- 10 Bibliotheek Woudenberg
|
||||
-- 901 Bibliotheek Woudenberg - Boerderij
|
||||
-- 921 Bibliotheek Leusden Boerderij
|
||||
|
||||
|
||||
WHEN UPPER (pto) LIKE 'HETEEMHUIS@%'
|
||||
THEN
|
||||
v_gebouwkey := '1';
|
||||
WHEN UPPER (pto) LIKE 'HETICOON@%'
|
||||
WHEN UPPER (pto) LIKE 'ICOON@%'
|
||||
THEN
|
||||
v_gebouwkey := '4';
|
||||
v_gebouwkey := '4';
|
||||
ELSE
|
||||
NULL;
|
||||
END CASE;
|
||||
@@ -111,6 +118,7 @@ BEGIN
|
||||
mld_alg_onroerendgoed_keys,
|
||||
prs_perslid_key,
|
||||
prs_perslid_key_voor,
|
||||
mld_melding_email_ext,
|
||||
mld_melding_spoed)
|
||||
VALUES (
|
||||
'MLD',
|
||||
@@ -124,12 +132,13 @@ BEGIN
|
||||
CHR (13) || CHR (10)),
|
||||
1,
|
||||
4000), -- verwijder onnodige witregels
|
||||
NULL,
|
||||
101,
|
||||
2,
|
||||
61,
|
||||
v_locatiekey,
|
||||
v_gebouwkey,
|
||||
sender,
|
||||
sender,
|
||||
pfrom,
|
||||
3)
|
||||
RETURNING mld_melding_key
|
||||
INTO v_newkey;
|
||||
|
||||
Reference in New Issue
Block a user