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

ASLE#33714 -- Personen als kenmerk toevoegen aan melding

Browse Source 
svn path=/Customer/trunk/; revision=26216
This commit is contained in:
Arthur Egberink
2015-09-08 10:55:26 +00:00
parent bdba7f050c
commit 5da2112816
1 changed files with 55 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

66
ASLE/asle.sql
View File

@@ -216,7 +216,8 @@ AS
COALESCE (mld_opdr_plandatum, s.mld_melding_einddatum),
s.plan_start,
'K' || s.alg_ruimte_nr,
s.mld_stdmelding_omschrijving
s.mld_stdmelding_omschrijving
|| DECODE (os.opm, NULL, NULL, ' ' || os.opm)
|| DECODE (o.mld_typeopdr_key, 101, ' (Herschoonmaak)', '')
|| DECODE (
o.mld_statusopdr_key,
@@ -230,12 +231,18 @@ AS
(SELECT mld_opdr_key, mld_kenmerkopdr_waarde
FROM mld_kenmerkopdr ko
WHERE mld_kenmerk_key = 61 AND mld_kenmerkopdr_verwijder IS NULL)
ks
ks,
(SELECT alg_onrgoed_key alg_ruimte_key,
alg_onrgoedkenmerk_waarde opm
FROM alg_onrgoedkenmerk aogk
WHERE alg_onrgoedkenmerk_verwijder IS NULL
AND alg_kenmerk_key = 1080) os -- opmerking voor de schoonmaker
WHERE o.mld_statusopdr_key IN (3, 5, 8)
AND o.mld_opdr_key = s.mld_opdr_key
AND TRUNC (COALESCE (s.plan_start, o.mld_opdr_einddatum)) =
TRUNC (SYSDATE)
AND o.mld_opdr_key = ks.mld_opdr_key(+);
AND o.mld_opdr_key = ks.mld_opdr_key(+)
AND s.alg_ruimte_key = os.alg_ruimte_key(+);
CREATE OR REPLACE VIEW asle_v_work_list_supervisor
(
@@ -774,6 +781,8 @@ CREATE OR REPLACE VIEW asle_v_rap_schoonmaak_result
srtruimte,
opdracht,
tijd,
volwassenen,
kinderen,
stop,
foundclean,
noservice
@@ -798,6 +807,14 @@ AS
* 24
* 60)
tijd,
(SELECT mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding km WHERE mld_kenmerk_key = 161
AND mld_kenmerkmelding_verwijder IS NULL
AND km.mld_melding_key = o.mld_melding_key) volwassenen,
(SELECT mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding km WHERE mld_kenmerk_key = 162
AND mld_kenmerkmelding_verwijder IS NULL
AND km.mld_melding_key = o.mld_melding_key) kinderen,
(SELECT COUNT ( * )
FROM fac_tracking t
WHERE fac_tracking_oms LIKE '%Stopgezet%'
@@ -827,6 +844,8 @@ AS
r.alg_srtruimte_omschrijving srtruimte,
NULL opdracht,
NULL tijd,
NULL volwassenen,
NULL kinderen,
0 stop,
0 foundclean,
1 noservice
@@ -1814,6 +1833,10 @@ AS
v_groep_naam VARCHAR2(100);
v_aantal_personen_txt VARCHAR2(100);
v_aantal_personen NUMBER(2);
v_aantal_junior_txt VARCHAR2(100);
v_aantal_kinderen_txt VARCHAR2(100);
v_aantal_babies_txt VARCHAR2(100);
v_aantal_kinderen NUMBER(2);
v_ruimte_status VARCHAR(100); -- Vacant, Departure, Stay, Out of Order
v_checkout_status VARCHAR2(100); -- checked out
v_schoonmaak_status VARCHAR2(100); -- dirty, clean, pending to check
@@ -1865,9 +1888,9 @@ BEGIN
fac.imp_getfield (v_newline, v_fielddelimitor, v_ruimte_status); -- Vacant, Departure, Stay
fac.imp_getfield (v_newline, v_fielddelimitor, v_schoonmaak_status); -- dirty, clean, pending to check
fac.imp_getfield (v_newline, v_fielddelimitor, v_aantal_personen_txt);
fac.imp_getfield (v_newline, v_fielddelimitor, v_skipfield); -- JU(nior)
fac.imp_getfield (v_newline, v_fielddelimitor, v_skipfield); -- CH(ild)
fac.imp_getfield (v_newline, v_fielddelimitor, v_skipfield); -- B(a)B(y)
fac.imp_getfield (v_newline, v_fielddelimitor, v_aantal_junior_txt); -- JU(nior)
fac.imp_getfield (v_newline, v_fielddelimitor, v_aantal_kinderen_txt); -- CH(ild)
fac.imp_getfield (v_newline, v_fielddelimitor, v_aantal_babies_txt); -- B(a)B(y)
fac.imp_getfield (v_newline, v_fielddelimitor, v_aankomst_datum_txt);
fac.imp_getfield (v_newline, v_fielddelimitor, v_vertrek_datum_txt);
fac.imp_getfield (v_newline, v_fielddelimitor, v_groep_naam);
@@ -1913,6 +1936,11 @@ BEGIN
v_errormsg := 'Inlezen aantal_personen';
v_aantal_personen := to_number(v_aantal_personen_txt);
v_errormsg := 'Inlezen aantal_kinderen';
v_aantal_kinderen := COALESCE(FAC.safe_to_number(v_aantal_junior_txt),0)
+ COALESCE(FAC.safe_to_number(v_aantal_kinderen_txt),0)
+ COALESCE(FAC.safe_to_number(v_aantal_babies_txt),0);
v_errormsg := 'Inlezen aankomst datum';
v_aankomst_datum := to_date(v_aankomst_datum_txt, 'dd-mm-yyyy');
@@ -2043,6 +2071,7 @@ BEGIN
groep,
groep_naam,
aantal_personen,
aantal_kinderen,
ruimte_status,
checkout_status,
schoonmaak_status,
@@ -2064,6 +2093,7 @@ BEGIN
SUBSTR(v_groep,1,30),
SUBSTR(v_groep_naam,1,30),
v_aantal_personen,
v_aantal_kinderen,
SUBSTR(v_ruimte_status,1,30),
SUBSTR(v_checkout_status,1,30),
SUBSTR(v_schoonmaak_status,1,30),
@@ -2383,11 +2413,19 @@ BEGIN
RETURNING mld_melding_key
INTO v_melding_key;
mld.upsertmeldingkenmerk (81, -- groepnaam
v_melding_key,
rec.groep_naam);
mld.setmeldingstatus (v_melding_key, 2, v_user_key);
END IF;
mld.upsertmeldingkenmerk (81, -- groepnaam
v_melding_key,
rec.groep_naam);
mld.upsertmeldingkenmerk (161, -- aantal volwassenen
v_melding_key,
rec.aantal_personen);
mld.upsertmeldingkenmerk (162, -- aantal kinderen
v_melding_key,
rec.aantal_kinderen);
mld.setmeldingstatus (v_melding_key, 2, v_user_key);
END;
END;
END LOOP;
@@ -2449,6 +2487,12 @@ BEGIN
mld.upsertmeldingkenmerk (81, -- groepnaam
rec.mld_melding_key,
'');
mld.upsertmeldingkenmerk (161, -- aantal volwassenen
rec.mld_melding_key,
NULL);
mld.upsertmeldingkenmerk (162, -- aantal kinderen
rec.mld_melding_key,
NULL);
END;
END LOOP;
@@ -2615,7 +2659,7 @@ BEGIN adm.systrackscriptId('$Id$', 0); END;
/
BEGIN fac.registercustversion('ASLE', 11); END;
BEGIN fac.registercustversion('ASLE', 12); END;
/
COMMIT;