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

FMHN#83313 AW formulier voor spoedgevallen

Browse Source 
svn path=/Customer/trunk/; revision=64238
This commit is contained in:
Sander Schepers
2024-04-15 07:37:04 +00:00
parent 034b3b0514
commit a51c243a6d
1 changed files with 107 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

110
FMHN/fmhn.sql
View File

@@ -6585,14 +6585,14 @@ AS
IS
SELECT vm.mld_melding_start_key, vm.mld_melding_key, vm.mld_melding_onderwerp, vm.mld_melding_status
FROM mld_melding m, mld_melding vm
WHERE m.mld_stdmelding_key = 741 -- Aanvraag AW (Startmelding)
WHERE m.mld_stdmelding_key IN (741,1241) -- Aanvraag AW & Aanvraag AW Spoed (Startmelding)
AND m.mld_melding_status = 4 -- In behandeling
AND m.mld_melding_key = vm.mld_melding_start_key
AND vm.mld_melding_key != m.mld_melding_key -- Niet de startmelding zelf!
AND EXISTS -- Doorgang gisteren gezet op Niet akkoord!
(SELECT 1
FROM mld_kenmerkmelding km, mld_melding nam
WHERE km.mld_kenmerk_key IN (2582, 2584) -- Doorgang=Niet akkoord
WHERE km.mld_kenmerk_key IN (2582, 2584, 4342) -- Doorgang=Niet akkoord
AND TRUNC (km.mld_kenmerkmelding_aanmaak) = TRUNC (SYSDATE - 1)
AND km.mld_melding_key = nam.mld_melding_key
AND nam.mld_melding_start_key = m.mld_melding_key)
@@ -6609,6 +6609,19 @@ AS
(SELECT 1
FROM mld_vrije_dagen
WHERE TRUNC (mld_vrije_dagen_datum) = TRUNC (SYSDATE))
UNION
SELECT vm.mld_melding_start_key, vm.mld_melding_key, vm.mld_melding_onderwerp, vm.mld_melding_status
FROM mld_melding m, mld_melding vm
WHERE m.mld_stdmelding_key = 1241 -- Aanvraag AW & Aanvraag AW Spoed (Startmelding)
AND m.mld_melding_status = 4 -- In behandeling
AND m.mld_melding_key = vm.mld_melding_start_key
AND vm.mld_melding_key != m.mld_melding_key -- Niet de startmelding zelf!
AND fac.count_work_days (fac.gettrackingdate ('MLDNEW', m.mld_melding_key), SYSDATE) = 1 -- Bij Aanvraag AW Spoed: 24 uur.
AND TO_CHAR (SYSDATE, 'd') BETWEEN '2' AND '6' -- Vandaag is werkdag
AND NOT EXISTS -- en geen vrije dag!
(SELECT 1
FROM mld_vrije_dagen
WHERE TRUNC (mld_vrije_dagen_datum) = TRUNC (SYSDATE))
ORDER BY 1, 2;
BEGIN
FOR rec IN c_aw
@@ -15487,6 +15500,7 @@ AS
-- CUST13 - Reminder naar Veiligheid + Compartimentseigenaren na 6 dagen. Alleen igv. Lange route!
-- CUST14 - Overeenstemming naar RBO, Veiligheid, PC, Facilitair adviseurs, Teamleiders + Compartimentseigenaren. Laatste 2 alleen igv. Lange route!
-- CUST15 - Geen overeenstemming naar RBO, Veiligheid, PC, Teamleiders + Compartimentseigenaren. Laatste 2 alleen igv. Lange route!
-- CUST30 - Eerste mail naar Compartimentseigenaren bij Spoedmelding, zowel Korte als Lange route
CREATE OR REPLACE VIEW FMHN_V_NOTI_WF_AW
(
CODE,
@@ -16228,7 +16242,97 @@ AS
sn.fac_srtnotificatie_code,
sn.fac_srtnotificatie_oms,
m.mld_melding_onderwerp,
ud2.fac_usrdata_omschr;
ud2.fac_usrdata_omschr
UNION ALL
SELECT sn.fac_srtnotificatie_code,
NULL,
NULL,
REPLACE (
REPLACE (
sn.fac_srtnotificatie_oms,
'##ID##',
TO_CHAR (m.mld_melding_key)),
'##SUBJECT##',
m.mld_melding_onderwerp),
m.mld_melding_key,
NULL xkey,
NULL xsender,
ud2.fac_usrdata_omschr xemail,
NULL xmobile,
'MLD/M'
|| SUBSTR (LPAD (TO_CHAR (m.mld_melding_key), 7, '0'), 1, 4)
|| '___/M'
|| TO_CHAR (m.mld_melding_start_key)
|| '/2578/*' attachments -- 2578 = bijlagen-kenmerk bij vakgroeptype AW
FROM mld_melding m,
fac_tracking t,
fac_notificatie_job nj,
mld_v_aanwezigkenmerkmelding km,
alg_onrgoedkenmerk ok,
fac_v_aanwezigusrdata ud1,
fac_v_aanwezigusrdata ud2,
fac_srtnotificatie sn
WHERE m.mld_stdmelding_key = 1242 -- Aanvraag AW Spoed, vervolgmelding aan Compartimentseigenaren
AND m.mld_melding_key = t.fac_tracking_refkey
AND t.fac_srtnotificatie_key = 50 -- MLDNEW
AND nj.fac_notificatie_job_view = 'FMHN_V_NOTI_WF_AW'
AND t.fac_tracking_datum > nj.fac_notificatie_job_lastrun
AND m.mld_melding_key = km.mld_melding_key
AND km.mld_kenmerk_key IN (2563,3582,3583) -- Ruimte/cluster=Lange route
AND fac.safe_to_number (km.mld_kenmerkmelding_waarde) = ok.alg_onrgoed_key
AND ok.alg_kenmerk_key = 1120 -- AW-cluster
AND fac.safe_to_number (ok.alg_onrgoedkenmerk_waarde) = ud1.fac_usrdata_key
AND fac.safe_to_number (ud1.fac_usrdata_code) = ud2.fac_usrtab_key
AND sn.fac_srtnotificatie_code = 'CUST30'
UNION ALL
SELECT sn.fac_srtnotificatie_code,
NULL,
NULL,
REPLACE (
REPLACE (
sn.fac_srtnotificatie_oms,
'##ID##',
TO_CHAR (m.mld_melding_key)),
'##SUBJECT##',
m.mld_melding_onderwerp),
m.mld_melding_key,
NULL xkey,
NULL xsender,
ud2.fac_usrdata_omschr xemail,
NULL xmobile,
'MLD/M'
|| SUBSTR (LPAD (TO_CHAR (m.mld_melding_key), 7, '0'), 1, 4)
|| '___/M'
|| TO_CHAR (m.mld_melding_start_key)
|| '/2578/*' attachments -- 2578 = bijlagen-kenmerk bij vakgroeptype AW
FROM mld_melding m,
fac_tracking t,
fac_notificatie_job nj,
mld_v_aanwezigkenmerkmelding km,
mld_v_aanwezigkenmerkmelding km2,
alg_onrgoedkenmerk ok,
fac_v_aanwezigusrdata ud1,
fac_v_aanwezigusrdata ud2,
fac_srtnotificatie sn
WHERE m.mld_stdmelding_key = 1242 -- Aanvraag AW Spoed, vervolgmelding aan Compartimentseigenaren
AND m.mld_melding_key = t.fac_tracking_refkey
AND t.fac_srtnotificatie_key = 50 -- MLDNEW
AND nj.fac_notificatie_job_view = 'FMHN_V_NOTI_WF_AW'
AND t.fac_tracking_datum > nj.fac_notificatie_job_lastrun
AND m.mld_melding_key = km.mld_melding_key
AND km2.mld_kenmerk_key = 3581 -- Alle clusters
AND km2.mld_kenmerkmelding_waarde = '21' -- JA
AND km2.mld_melding_key = m.mld_melding_key
AND ok.alg_kenmerk_key = 1120 -- AW-cluster
AND fac.safe_to_number (ok.alg_onrgoedkenmerk_waarde) = ud1.fac_usrdata_key
AND fac.safe_to_number (ud1.fac_usrdata_code) = ud2.fac_usrtab_key
AND sn.fac_srtnotificatie_code = 'CUST30'
GROUP by m.mld_melding_key,
m.mld_melding_start_key,
sn.fac_srtnotificatie_code,
sn.fac_srtnotificatie_oms,
m.mld_melding_onderwerp,
ud2.fac_usrdata_omschr;
-- Uurlijkse bewaking op WF tb.v VTW-proces!
-- CUST16 - Nieuwe VTW geconstateerd door VTW-team: ##Korte omschrijving## naar EM-er