VEBE#57982 Herinrichting wagenparkbeheer met workflow

svn path=/Customer/trunk/; revision=47940
This commit is contained in:
Sander Schepers
2020-08-26 21:04:02 +00:00
parent ffbdc845ce
commit 656dd3ce92

View File

@@ -2364,43 +2364,103 @@ CREATE OR REPLACE VIEW vebe_v_rap_cnt
ins_deel_key
)
AS
SELECT contract_key,
nummer,
omschrijving,
opmerking,
contractafdeling,
contractpartij,
contracteigenaar,
contractbeheerder,
begindatum,
einddatum,
opzegdatum,
rappeldatum,
opzegtermijn,
rappeltermijn,
omschrijving || ' - '
|| COALESCE (
(SELECT pkm.prs_kenmerklink_waarde
FROM prs_kenmerklink pkm, cnt_contract cnt
WHERE pkm.prs_kenmerk_key = 1040 --Kenmerk-key voor afkorting van relatie
AND cnt.cnt_contract_key = contract_key
AND pkm.prs_link_key = cnt.cnt_prs_bedrijf_key),
contractpartij)
SELECT contract_key,
nummer,
omschrijving,
opmerking,
contractafdeling,
contractpartij,
contracteigenaar,
contractbeheerder,
begindatum,
einddatum,
opzegdatum,
rappeldatum,
opzegtermijn,
rappeltermijn,
omschrijving || ' - '
|| COALESCE (
(SELECT pkm.prs_kenmerklink_waarde
FROM prs_kenmerklink pkm, cnt_contract cnt
WHERE pkm.prs_kenmerk_key = 1040 --Kenmerk-key voor afkorting van relatie
AND cnt.cnt_contract_key = contract_key
AND pkm.prs_link_key = cnt.cnt_prs_bedrijf_key),
contractpartij)
|| ' ('
|| contractafdeling
|| ' - '
|| TO_CHAR (einddatum, 'DD-MM-YYYY')
|| ')'
AS aflopend_contract,
ins_cnt.cnt_ins_deel_key
FROM cnt_v_udr_contract, cnt_v_aanwezigcontract_object ins_cnt
WHERE UPPER (contractsoort) = 'LEASECONTRACT'
AND contract_key = ins_cnt.cnt_contract_key
AND contract_key =
(SELECT MAX (co.cnt_contract_key)
FROM cnt_v_aanwezigcontract_object co, cnt_contract c
WHERE c.cnt_contract_key = co.cnt_contract_key
AND c.ins_discipline_key = 21 -- Leaseovereenkomst
AND co.cnt_ins_deel_key = ins_cnt.cnt_ins_deel_key);
CREATE OR REPLACE VIEW vebe_v_noti_cntrappel_wm
(
code,
sender,
receiver,
text,
key,
xkey
)
AS
SELECT 'CUST04',
'',
p.prs_perslid_key,
'Contract ' || c.cnt_contract_nummer_intern
|| DECODE (cnt_contract_versie,
NULL, '',
'.' || cnt_contract_versie)
|| ' ('
|| contractafdeling
|| ' - '
|| TO_CHAR (einddatum, 'DD-MM-YYYY')
|| c.cnt_contract_omschrijving
|| ' '
|| b.prs_bedrijf_naam
|| ')'
AS aflopend_contract,
ins_cnt.cnt_ins_deel_key
FROM cnt_v_udr_contract, cnt_v_aanwezigcontract_object ins_cnt
WHERE UPPER (contractsoort) = 'LEASECONTRACT'
AND contract_key = ins_cnt.cnt_contract_key
AND contract_key =
(SELECT MAX (cnt_contract_key)
FROM cnt_v_aanwezigcontract_object
WHERE cnt_v_aanwezigcontract_object.cnt_ins_deel_key =
ins_cnt.cnt_ins_deel_key);
|| ' moet uiterlijk per '
|| TO_CHAR (cnt.cnt_getopzegdatum (c.cnt_contract_key),
'DD-MM-YYYY')
|| ' worden verlengd of opgezegd.',
c.cnt_contract_key,
NULL
FROM cnt_v_aanwezigcontract c,
prs_bedrijf b,
prs_perslid p,
prs_afdeling a,
fac_groeprechten gr,
fac_gebruikersgroep gg,
fac_functie f
WHERE b.prs_bedrijf_key = c.cnt_prs_bedrijf_key
AND cnt_contract_verwijder IS NULL
AND cnt_contract_status = 0
AND (SYSDATE BETWEEN cnt.cnt_getrappeldatum (c.cnt_contract_key)
AND cnt.cnt_getopzegdatum (c.cnt_contract_key))
AND gr.ins_discipline_key = 121 -- Werkmaatschappij (administratief)
AND p.prs_perslid_key = gg.prs_perslid_key
AND gr.fac_groep_key = gg.fac_groep_key
AND p.prs_afdeling_key = a.prs_afdeling_key
AND c.prs_afdeling_key_eig = p.prs_afdeling_key
AND gr.fac_functie_key = f.fac_functie_key
AND p.prs_perslid_email IS NOT NULL
AND f.fac_functie_code = 'WEB_MLDBOF'
AND c.cnt_contract_key NOT IN
(SELECT km.mld_kenmerkmelding_waarde
FROM mld_kenmerkmelding km, mld_melding m
WHERE m.mld_melding_key = km.mld_melding_key
AND m.mld_stdmelding_key = 301 --Start workflow
AND km.mld_kenmerk_key = 421 -- Kenmerk aflopend contract
AND m.mld_melding_status IN (2, 4)) -- Nieuw / In behandeling
AND c.cnt_contract_key NOT IN (SELECT fac_tracking_refkey --CUST04
FROM fac_tracking
WHERE fac_srtnotificatie_key = 449);
-- payload end ---