VLKC#68725 specifieke kostenplaats bij specifieke standaardmeldingen

svn path=/Customer/trunk/; revision=55945
This commit is contained in:
Jos Groot Lipman
2022-05-18 13:30:38 +00:00
parent 0eb973cad8
commit 8c19358f08
3 changed files with 31 additions and 31 deletions

View File

@@ -168,11 +168,11 @@ BEGIN
v_prs_bedrijf_key := 797;
v_errormsg := 'Bepaal einddatum';
-- wat is de eerste dag van de huidige maand
v_date := to_date(to_char(sysdate, 'yyyymm')||'01','yyyymmdd');
SELECT count(mld_opdr_key)
INTO v_count
FROM mld_opdr
@@ -184,7 +184,7 @@ BEGIN
WHERE rra.res_rsv_artikel_verwijder IS NULL
AND rra.res_status_bo_key = 5 -- geleverd.
AND rra.res_rsv_artikel_levering < v_date;
IF v_count > 0 THEN
fac.writelog (p_applname, 'E', 'Catering export is al eerder uitgevoerd.',
'Controleer opdrachten met datum: ' || to_char(v_date, 'dd-mm-yyyy'));
@@ -203,7 +203,7 @@ BEGIN
WHERE rrr.prs_kostenplaats_key IS NULL;
-- maak een melding aan voor deze maand
v_errormsg := 'Aanmaken catering melding';
BEGIN
INSERT INTO mld_melding
@@ -235,7 +235,7 @@ BEGIN
'MLD',
3
) RETURNING mld_melding_key INTO v_mld_melding_key;
BEGIN mld.setmeldingstatus(v_mld_melding_key, 2, v_aanvrager); END;
BEGIN mld.setmeldingstatus(v_mld_melding_key, 4, v_aanvrager); END;
UPDATE mld_melding SET mld_melding_behandelaar_key= v_aanvrager WHERE mld_melding_key = v_mld_melding_key;
@@ -244,7 +244,7 @@ BEGIN
-- aanmaken opdracht
BEGIN
BEGIN
v_mld_opdr_bedrijfopdr_volgnr := mld.BepaalOpdrMeldingVolgnr (v_mld_melding_key);
v_errormsg := 'Maak opdracht aan om factuur van cateraar te matchen';
@@ -276,8 +276,8 @@ BEGIN
, v_total
, v_total
, v_mld_opdr_bedrijfopdr_volgnr);
UPDATE res_rsv_artikel rra
UPDATE res_rsv_artikel rra
SET res_rsv_artikel_verwerkt = SYSDATE,
res_status_bo_key = 6
WHERE rra.res_rsv_artikel_verwijder IS NULL
@@ -781,8 +781,8 @@ AS
al10
FROM prs_perslid p, aaes_v_afdeling_boom a
WHERE p.prs_afdeling_key = a.prs_afdeling_key);
CREATE OR REPLACE VIEW aaes_v_rap_fiat_leiding
(
NUMMER,
@@ -891,7 +891,7 @@ AS
AND sm.mld_stdmelding_key = 806 -- Goedkeuring door leidinggevende
AND td.ins_srtdiscipline_key = sd.ins_srtdiscipline_key
AND m.prs_perslid_key = pf.prs_perslid_key
AND pf.prs_perslid_key = l.prs_perslid_key;
AND pf.prs_perslid_key = l.prs_perslid_key;
CREATE OR REPLACE VIEW aaes_v_hr_adviseur
@@ -904,7 +904,7 @@ AS
FROM prs_v_perslid_fullnames pf, fac_gebruikersgroep gg
WHERE pf.prs_perslid_key = gg.prs_perslid_key AND gg.fac_groep_key = 181;
CREATE OR REPLACE VIEW aaes_v_noti_leaseaanvraag (
code,
sender,
@@ -943,7 +943,7 @@ AS
AND m.mld_stdmelding_key = 805 -- Aanvraag formulier leaseauto
AND m.mld_melding_datum > SYSDATE - 1
AND m.mld_melding_status IN (2, 3, 4);
-- export leaseopdracht naar leasemaatschappij
CREATE OR REPLACE PROCEDURE aaes_export_lease_aanvraag (
p_applname IN VARCHAR2
@@ -966,7 +966,7 @@ IS
AND NOT EXISTS (SELECT mld_melding_key
FROM mld_opdr o
WHERE mld_melding_key = m.mld_melding_key)
GROUP BY mld_melding_key, prs_kostenplaats_key, mld_melding_omschrijving;
GROUP BY mld_melding_key, m.prs_kostenplaats_key, mld_melding_omschrijving;
CURSOR co
IS
@@ -1070,7 +1070,7 @@ END aaes_export_lease_aanvraag;
-- Dagelijkse taak om a.d.h.v. het kenmerk leidinggevende bij de afdeling, de budgethouder
-- bij de kostenplaats te bepalen. Indien de afdeling geen leidinggevende heeft wordt in de
-- organisatieboom naar boven gezocht totdat er een leidinggevende gevonden is.
CREATE OR REPLACE PROCEDURE aaes_set_budgethouder
CREATE OR REPLACE PROCEDURE aaes_set_budgethouder
AS
BEGIN
@@ -1080,7 +1080,7 @@ BEGIN
(SELECT a.prs_kostenplaats_key, prs_perslid_key_leid
FROM aaes_v_leidinggevende_afd la, prs_afdeling a
WHERE la.prs_afdeling_key = a.prs_afdeling_key);
UPDATE prs_kostenplaats k
SET prs_perslid_key =
(SELECT DISTINCT prs_perslid_key
@@ -1089,7 +1089,7 @@ BEGIN
WHERE prs_kostenplaats_key > 40
AND prs_kostenplaats_verwijder IS NULL;
-- voeg leidinggevenden toe aan de autorisatiegroep 'Essent leidinggevende'
-- voeg leidinggevenden toe aan de autorisatiegroep 'Essent leidinggevende'
INSERT INTO fac_gebruikersgroep (prs_perslid_key, fac_groep_key)
SELECT DISTINCT prs_perslid_key, 183 -- Essent leidinggevende
FROM prs_kostenplaats k
@@ -1099,14 +1099,14 @@ BEGIN
WHERE k.prs_perslid_key = gg.prs_perslid_key
AND fac_groep_key = 183)
AND prs_perslid_key IS NOT NULL;
-- verwijder personen als leidinggevende als ze geen budgethouder meer zijn
DELETE fac_gebruikersgroep gg
WHERE fac_groep_key = 183
AND NOT EXISTS (SELECT prs_perslid_key
FROM prs_kostenplaats k
WHERE k.prs_perslid_key = gg.prs_perslid_key);
-- set profiel van de leidinggevende bij medewerkers van Essent (authenticatie is gevuld met IAM id)
-- profiel wordt niet aangepast voor AAFM medewerkers
UPDATE prs_perslid p
@@ -1117,7 +1117,7 @@ BEGIN
AND COALESCE(fac_profiel_key, 1) = 1
AND prs_perslid_authenticatie IS NOT NULL
AND UPPER(prs_perslid_email) NOT LIKE '%AA-FM.COM';
-- set het profiel van alle oud-leidinggevenden en nieuwe personen naar default 500.
-- profiel wordt niet aangepast voor AAFM medewerkers
UPDATE prs_perslid p
@@ -1215,7 +1215,7 @@ AS
AND fac.safe_to_number (fac_usrdata_code) =
rrg.res_ruimte_key);
-- Ticket 57464 - Rapport voor dashboard - Alle ingevoerde facturen van de vaste en variabele contracten
-- Ticket 57464 - Rapport voor dashboard - Alle ingevoerde facturen van de vaste en variabele contracten
CREATE OR REPLACE VIEW AAES_V_RAP_CNT_FACTUREN
(
UITVOERENDE,

View File

@@ -1156,7 +1156,7 @@ AS
|| TO_CHAR (v.aantalopmerkingen)
|| ' notities geplaatst vanuit Logcenter Facilitor op AAIT-opdrachtnr '
|| v.mld_melding_key || '/' || v.mld_opdr_bedrijfopdr_volgnr
|| ' (' || v.logcenter_omg || '#' || v.logcenter_key || ')'
|| ' (' || v.logcenter_omg || '#' || v.logcenter_key || ')'
text,
'CUST15'
code,
@@ -1169,7 +1169,7 @@ AS
NULL
xkey,
CASE WHEN v.mld_stdmelding_key = 3901 THEN v.aanvrager_mail -- Specifiek voor stdmelding '(aan)vraag mbt mareon' moet de mailnotificatie naar de aanvrager (= mdw fin-afdeling)
ELSE v.behandelaar_mail END
ELSE v.behandelaar_mail END
xemail,
NULL
xmobile
@@ -1177,12 +1177,12 @@ AS
o.mld_melding_key,
o.mld_opdr_bedrijfopdr_volgnr,
m.mld_stdmelding_key,
(SELECT p.prs_perslid_email
(SELECT p.prs_perslid_email
FROM prs_perslid p
WHERE p.prs_perslid_key = o.prs_perslid_key) as behandelaar_mail,
(SELECT p.prs_perslid_email
(SELECT p.prs_perslid_email
FROM prs_perslid p
WHERE p.prs_perslid_key = m.prs_perslid_key) as aanvrager_mail,
WHERE p.prs_perslid_key = m.prs_perslid_key) as aanvrager_mail,
(SELECT SUBSTR (k.mld_kenmerkopdr_waarde, 6)
FROM mld_kenmerkopdr k, mld_kenmerk km
WHERE k.mld_kenmerk_key = km.mld_kenmerk_key
@@ -1192,7 +1192,7 @@ AS
FROM mld_kenmerkopdr k, mld_kenmerk km
WHERE k.mld_kenmerk_key = km.mld_kenmerk_key
AND km.mld_srtkenmerk_key = 181
AND mld_opdr_key = o.mld_opdr_key) as logcenter_omg,
AND mld_opdr_key = o.mld_opdr_key) as logcenter_omg,
on1.mld_opdr_note_aanmaak,
(SELECT COUNT (*)
FROM mld_opdr_note on2
@@ -1205,7 +1205,7 @@ AS
WHERE ft.fac_tracking_refkey = o.mld_opdr_key
AND ft.fac_srtnotificatie_key = sn.fac_srtnotificatie_key
AND sn.fac_srtnotificatie_xmlnode = 'opdracht'
AND sn.fac_srtnotificatie_code = 'CUST15'),
AND sn.fac_srtnotificatie_code = 'CUST15'),
SYSDATE -
(SELECT COALESCE (fac_notificatie_job_interval, 1) / 24
FROM fac_notificatie_job
@@ -1473,7 +1473,7 @@ IS
FROM mld_opdr o
WHERE mld_melding_key = m.mld_melding_key)
GROUP BY mld_melding_key,
prs_kostenplaats_key,
m.prs_kostenplaats_key,
mld_melding_omschrijving,
mld_typeopdr_key,
mld_melding_einddatum,

View File

@@ -1055,7 +1055,7 @@ IS
FROM mld_opdr o
WHERE mld_melding_key = m.mld_melding_key)
GROUP BY mld_melding_key,
prs_kostenplaats_key,
m.prs_kostenplaats_key,
mld_melding_omschrijving,
mld_typeopdr_key,
mld_melding_einddatum,