EIND#80433 Meldingen kunnen accorderen - savepoint

svn path=/Database/trunk/; revision=62689
This commit is contained in:
Peter Feij
2023-11-23 15:35:04 +00:00
parent 8ceae98433
commit 676f9d92e2
3 changed files with 37 additions and 6 deletions

View File

@@ -2002,7 +2002,7 @@ DEF_FAC_SRTNOT('MLDAP1', 3, 'lcl_noti_MLDAP1', 'mld/mld_opdr.asp?opdr_key=', '
DEF_FAC_SRTNOT('MLDINF', 2, 'lcl_noti_MLDINF', 'mld/mld_melding.asp?mld_key=', '0', 'melding', 10);
DEF_FAC_SRTNOT('MLDING', 0, 'lcl_noti_MLDING', 'mld/mld_melding.asp?mld_key=', '0', 'melding', 10);
DEF_FAC_SRTNOT('MLDNEW', 1, 'lcl_noti_MLDNEW', 'mld/mld_melding.asp?mld_key=', '0', 'melding', 60);
DEF_FAC_SRTNOT('MLDCON', 1, 'lcl_noti_MLDCON', 'mld/mld_melding.asp?mld_key=', '0', 'melding', 60);
DEF_FAC_SRTNOT('MLDCON', 0, 'lcl_noti_MLDCON', 'mld/mld_melding.asp?mld_key=', '0', 'melding', 60);
DEF_FAC_SRTNOT('MLD2CO', 3, 'lcl_noti_MLD2CO', 'mld/mld_melding.asp?mld_key=', '0', 'melding', 10);
DEF_FAC_SRTNOT('MLDNW3', 2, 'lcl_noti_MLDNW3', 'mld/mld_melding.asp?mld_key=', '0', 'melding', 300);
DEF_FAC_SRTNOT('MLDREJ', 9, 'lcl_noti_MLDREJ', 'mld/mld_melding.asp?mld_key=', '0', 'melding', 10);

View File

@@ -803,9 +803,11 @@ FAC_LCL('lcl_mld_is_mldbeh_none', 'Behandelaar is nu onbekend', 'Call is now una
FAC_LCL('lcl_mld_is_mldabh', 'Toegewezen aan behandelaar', 'Assigned to handler')
FAC_LCL('lcl_mld_is_mldabh_to', 'Actieve behandeling is toegewezen aan ', 'Processing has been assigned to ')
FAC_LCL('lcl_mld_is_mldabh_none', 'Behandelaar is nu onbekend', 'Handler is now unknown')
FAC_LCL('lcl_mld_is_mldcon', 'Melding is geregistreerd en wacht op instemming', 'Call is registered for consent')
FAC_LCL('lcl_mld_is_mldcon', 'Melding is geregistreerd en wacht op instemming', 'Call is registered and waiting for consent')
FAC_LCL('lcl_mld_is_mldnew', 'Melding is geregistreerd', 'Call is registered')
FAC_LCL('lcl_mld_is_mldupd', 'Melding is gewijzigd', 'Call is updated')
FAC_LCL('lcl_mld_is_mldinstemtrack', '{1} heeft ingestemd met melding {0}', 'Consent for {0} has been given by {1}')
FAC_LCL('lcl_mld_defaultinstemming', 'Automatische instemming omdat er voor deze situatie geen instemmer is', 'Default consent because no one is defined for this situation')
FAC_LCL('lcl_mld_is_mldupdtrack', 'Melding {0} is gewijzigd', 'Call {0} is updated')
FAC_LCL('lcl_mld_is_mldafrtrack', 'Melding {0} is afgerond', 'Call {0} is completed')
FAC_LCL('lcl_ord_is_ordupdtrack', 'Opdracht {0} is gewijzigd', 'Order {0} is updated')
@@ -950,6 +952,11 @@ FAC_LCL('lcl_mld_conceptstatus_1', 'Wacht op budgethouder', 'Waiting for budgeth
FAC_LCL('lcl_mld_conceptstatus_2', 'Wacht op objectbeheerder', 'Waiting for objectmanager')
FAC_LCL('lcl_mld_conceptstatus_4', 'Wacht op afdelingsverantwoordelijke', 'Waiting for departmentmanager')
FAC_LCL('lcl_mld_conceptstatus_8', 'Wacht op persoonlijk leidinggevende', 'Waiting for personal manager')
FAC_LCL('lcl_mld_conceptstatus_1_by', 'Wacht op budgethouder {0}', 'Waiting for budgetholder {0}')
FAC_LCL('lcl_mld_conceptstatus_2_by', 'Wacht op objectbeheerder {0}', 'Waiting for objectmanager {0}')
FAC_LCL('lcl_mld_conceptstatus_4_by', 'Wacht op afdelingsverantwoordelijke {0}', 'Waiting for departmentmanager {0}')
FAC_LCL('lcl_mld_conceptstatus_8_by', 'Wacht op persoonlijk leidinggevende {0}', 'Waiting for personal manager {0}')
FAC_LCL('lcl_mld_ongeldige_instemmer', 'Melding {0} vereist instemming van {1}', 'Call {0} requires consent from {1}')
FAC_LCL('lcl_mld_publiek', 'Openbaar', 'Public')
FAC_LCL('lcl_mld_issuer_search', 'Plaats van de aanvrager', 'Place of the issuer')
FAC_LCL('lcl_mld_references', ' > ', ' > ')
@@ -1500,6 +1507,7 @@ FAC_LCL('lcl_schedule', 'Plannen', 'Schedule')
FAC_LCL('lcl_schedule_start', 'Plannen begin', 'Schedule start')
FAC_LCL('lcl_schedule_end', 'Plannen eind', 'Schedule end')
FAC_LCL('lcl_reject', 'Afwijzen', 'Reject')
FAC_LCL('lcl_instem', 'Instemmen', 'Consent')
FAC_LCL('lcl_forward', 'Doorsturen', 'Forward')
FAC_LCL('lcl_forwarded', 'De melding is doorgestuurd.', 'The call has been forwarded')
FAC_LCL('lcl_not_forwarded', 'Dit is dezelfde melding, de melding is dus niet doorgestuurd.', 'This is the same call, the call has not been forwarded.')
@@ -1538,6 +1546,7 @@ FAC_LCL('lcl_doorzet_hint', 'Zet de behandeling door naar de backoffice', 'Forwa
FAC_LCL('lcl_terugzet_hint', 'Zet de behandeling terug naar de frontoffice', 'Return this call to the front office')
FAC_LCL('lcl_accept_hint', 'Accepteer deze melding voor behandeling', 'Accept this call for processing')
FAC_LCL('lcl_reject_hint', 'Wijs deze melding af (wordt niet verder behandeld)', 'Reject this call (no further processing)')
FAC_LCL('lcl_instem_hint', 'Stem in met de behandeling van deze melding', 'Agree to the handling of this call')
COMMIT;
FAC_LCL('lcl_close_hint', 'Sluit deze melding nu af, de afhandeling is gereed.', 'Close this call right now, no further action required')
@@ -3346,6 +3355,7 @@ FAC_LCL('lcl_prs_dept_name', 'Code', 'Code')
FAC_LCL('lcl_prs_dept_desc', 'Omschrijving', 'Description')
FAC_LCL('lcl_prs_dept_kosten', 'Kostenplaats', 'Account nr')
FAC_LCL('lcl_prs_dept_company', 'Bedrijf', 'Company')
FAC_LCL('lcl_prs_dept_verantw', 'Verantwoordelijke', 'Manager')
FAC_LCL('prs_afdeling_externid', 'Extern id', 'External id')
FAC_LCL('prs_afdeling_externsyncdate', 'Extern syncdate', 'External syncdate')
FAC_LCL('lcl_prs_person_name', 'Naam', 'Name')
@@ -3389,6 +3399,7 @@ FAC_LCL('lcl_prs_person_dienstverband_perc', 'Dienstverband (%)', 'Employment (%
FAC_LCL('lcl_prs_person_opp', 'Opp', 'Area size')
FAC_LCL('lcl_prs_person_ingangsdatum', 'Ingangsdatum', 'Start Date')
FAC_LCL('lcl_prs_person_einddatum', 'Einddatum', 'End Date')
FAC_LCL('lcl_prs_person_verantw', 'Verantwoordelijke', 'Manager')
FAC_LCL('lcl_advanced', 'Kenmerkfilter', 'Property filter')
FAC_LCL('lcl_prs_wp_bad_occupation', 'Ongeldige bezetting', 'Invalid occupation value')
FAC_LCL('lcl_prs_wp_fgraph', 'Plattegrond', 'Plan')
@@ -5077,7 +5088,8 @@ FAC_LCL('lcl_mld_doorgezet1', 'Melding is doorgezet naar backoffice', 'Call is a
FAC_LCL('lcl_mld_doorgezet', '{0} meldingen zijn doorgezet naar backoffice', '{0} calls are assigned to the back office')
FAC_LCL('lcl_mld_teruggezet1', 'Melding is teruggezet naar frontoffice', 'Call is assigned to the front office')
FAC_LCL('lcl_mld_teruggezet', '{0} meldingen zijn teruggezet naar frontoffice', '{0} calls are assigned to the front office')
FAC_LCL('lcl_mld_ask_afrond', 'Wilt u melding {0} afronden', 'Do you want to finish call {0}?')
FAC_LCL('lcl_mld_ask_instem', 'Stemt u in met melding {0}?', 'Do you consent to call {0}?')
FAC_LCL('lcl_mld_ask_afrond', 'Wilt u melding {0} afronden?', 'Do you want to finish call {0}?')
FAC_LCL('lcl_mld_ask_verwerk', 'Wilt u melding {0} archiveren?', 'Do you want to archive call {0}?')
FAC_LCL('lcl_mld_ord_close_all', ' openstaande opdracht(en) ook afmelden?', ' open order(s). Close order(s) as well?')
FAC_LCL('lcl_mld_ctr_close_all', ' openstaande controle(s) ook gereedmelden?', ' open inspection(s). Close inspection(s) as well?')

View File

@@ -365,6 +365,13 @@ CREATE OR REPLACE PACKAGE BODY mld AS
-- We know that trackaction doesn't do tracking if eventcode is null
fac.trackaction (eventcode, pmeldingkey, puserkey, NULL, NULL);
-- Als het concept is moet altijd de insteming ingeschakeld worden.
IF eventcode = 'MLDCON'
THEN
mld.notifyinstemmer(pmeldingkey);
END IF;
FOR r IN c_mldchilderen
LOOP
UPDATE mld_melding
@@ -1342,9 +1349,13 @@ CREATE OR REPLACE PACKAGE BODY mld AS
-- de budgetverantwoordelijke moet instemmen
IF l_kp_key IS NOT NULL
THEN
l_instemmer_key := prs.getkpverantwoordelijke (l_kp_key, NULL, NULL);
SELECT prs.getkpverantwoordelijke (l_kp_key, NULL, NULL)
INTO l_instemmer_key
FROM DUAL;
IF l_instemmer_key < 0 -- kan misschien ook -1 opleveren ipv null
IF l_instemmer_key IS NULL
OR l_instemmer_key < 0 -- kan misschien ook -1 opleveren ipv null
OR l_instemmer_key = l_melder_key -- dat ben ik zelf
THEN
l_instemmer_key := NULL;
END IF;
@@ -1354,6 +1365,9 @@ CREATE OR REPLACE PACKAGE BODY mld AS
WHEN 2
THEN
--objectbeheerder, kies er maar een als er meer zijn..
-- NB: UNSUPPORTED YET. Omdat de objecten pas later worden toegevoegd aan
-- de nieuwe melding is deze flow onvoldoende voor deze case in deze opzet
-- We verstoppen deze als optie in de GUI.
BEGIN
SELECT MAX (d.prs_perslid_key_beh)
INTO l_instemmer_key
@@ -1386,6 +1400,9 @@ CREATE OR REPLACE PACKAGE BODY mld AS
RETURN l_instemmer_key;
END;
-- Notificeer de persoon die moet instemmen met de indiening van deze melding
-- Als die er niet is, dan notificeren we niet, maar promoveren we de melding
-- hier direct naar ingestemd, dus nieuw.
PROCEDURE notifyinstemmer (pmldkey IN NUMBER)
AS
--l_melder_key mld_melding.prs_perslid_key%TYPE;
@@ -1423,9 +1440,11 @@ CREATE OR REPLACE PACKAGE BODY mld AS
SET mld_melding_conceptstatus = 0 -- bij BITAND alleen de beschouwde bits wissen
WHERE mld_melding_key = pmldkey;
fac.trackaction ('#MLDUPD', pmldkey, NULL, NULL, lcl.l('lcl_mld_defaultinstemming'));
mld.setmeldingstatus (pmldkey,
2,
NULL, -- (overweging l_melder_key)
NULL,
0);
END IF;
END;