AAXX#39588 -- Bundel catering referentie opslaan

svn path=/Customer/trunk/; revision=36163
This commit is contained in:
Arthur Egberink
2017-11-30 09:46:58 +00:00
parent c016a564bd
commit ba00a09846

View File

@@ -120,8 +120,8 @@ AS
rra.res_rsv_artikel_key,
rra.res_rsv_artikel_levering,
rra.res_status_bo_key,
(SELECT FAC.safe_to_number(alg_onrgoedkenmerk_waarde)
FROM alg_onrgoedkenmerk
(SELECT FAC.safe_to_number(alg_onrgoedkenmerk_waarde)
FROM alg_onrgoedkenmerk
WHERE alg_kenmerk_key = 5 -- kenmerk voor catering stdmelding key
AND alg_onrgoed_key = g.alg_locatie_key) mld_stdmelding_key
FROM res_rsv_artikel rra,
@@ -129,10 +129,12 @@ AS
res_artikel ra,
(SELECT ins_discipline_key,
DECODE (INSTR (ins_discipline_omschrijving, 'Sodexo'),
0, DECODE (INSTR (ins_discipline_omschrijving, 'Albron'),
0, DECODE (INSTR (ins_discipline_omschrijving, 'Hutten'), 0, -1, 7064) -- Albron
, 184) -- Albron
, 247) -- Sodexo
0, DECODE (INSTR (ins_discipline_omschrijving, 'Albron'),
0, DECODE (INSTR (ins_discipline_omschrijving, 'Hutten'),
0, DECODE (INSTR (ins_discipline_omschrijving, 'Emmtec'), 0, -1, 12796) -- Emmtec
, 7064) -- Hutten
, 184) -- Albron
, 247) -- Sodexo
prs_bedrijf_key
FROM ins_tab_discipline) rdb,
alg_ruimte r,
@@ -237,7 +239,7 @@ BEGIN
mld_melding_module,
mld_melding_spoed
)
VALUES
VALUES
(
'Catering factuur boekingen tot ' || to_char(v_date, 'dd-mm-yyyy'),
v_aanvrager,
@@ -252,11 +254,11 @@ 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;
v_errormsg := 'Maak opdracht aan om factuur van cateraar te matchen';
v_mld_opdr_bedrijfopdr_volgnr := mld.BepaalOpdrMeldingVolgnr (v_mld_melding_key);
@@ -298,17 +300,30 @@ BEGIN
MLD.setmeldingstatus(v_mld_melding_key, 5, v_aanvrager); -- afgemeld, facilitor
MLD.mld_nextworkflowstep (v_mld_melding_key, 1);
END LOOP;
v_errormsg := 'Voeg regels toe aan mapping tabel';
v_errormsg := 'Markeer alle verwerkte catering bestellingen';
UPDATE res_rsv_artikel rra
SET res_rsv_artikel_verwerkt = SYSDATE,
res_status_bo_key = 6
WHERE EXISTS (SELECT res_rsv_artikel_key
FROM aads_v_bundel_catering rbc
WHERE rbc.res_rsv_artikel_key = rra.res_rsv_artikel_key
AND rbc.res_rsv_artikel_levering < v_date
AND res_status_bo_key = 5);
INSERT INTO aaxx_bundel_catering_ref (mld_opdr_key, res_rsv_artikel_key, res_rsv_artikel_prijs, res_rsv_artikel_verwerkt)
SELECT v_mld_opdr_key, res_rsv_artikel_key, res_rsv_artikel_prijs, v_date
FROM aads_v_bundel_catering c
WHERE res_rsv_artikel_levering < v_date
AND c.prs_bedrijf_key = rec.prs_bedrijf_key
AND c.prs_kostenplaats_key = rec.prs_kostenplaats_key
AND c.alg_locatie_key = rec.alg_locatie_key
AND c.alg_gebouw_key = rec.alg_gebouw_key
AND c.mld_stdmelding_key = rec.mld_stdmelding_key
AND c.res_status_bo_key = 5;
v_errormsg := 'Pas de status van de artikelen aan ' || v_mld_opdr_key;
UPDATE res_rsv_artikel rra
SET res_rsv_artikel_verwerkt = SYSDATE,
res_status_bo_key = 6
WHERE EXISTS
(SELECT mld_opdr_key
FROM aaxx_bundel_catering_ref bc
WHERE bc.mld_opdr_key = v_mld_opdr_key
AND bc.res_rsv_artikel_key = rra.res_rsv_artikel_key);
END LOOP;
COMMIT;
@@ -573,7 +588,7 @@ AS
2;
-- AADS#39742 rapport geautoriseerde bestellers
-- Keys 1000, 1001 en 1002 zijn checkboxen Budgethouder, Geautoriseerd besteller en Gedelegeerd budgethouder
-- Keys 1000, 1001 en 1002 zijn checkboxen Budgethouder, Geautoriseerd besteller en Gedelegeerd budgethouder
CREATE OR REPLACE VIEW aads_v_rap_auth_bestellers2
(
fclt_f_naam,
@@ -640,9 +655,9 @@ AS
ORDER BY 1,
3,
4,
2;
-- AADS#34572 rapportage tbv huuradministratie
2;
-- AADS#34572 rapportage tbv huuradministratie
CREATE OR REPLACE VIEW aads_v_rap_alg_huuradmin
(
fclt_f_locatie_code,
@@ -929,7 +944,7 @@ SELECT kwartaal,
-- Freeze rapportage over voorgaande freezes naar DWH
CREATE OR REPLACE VIEW aads_v_dwh_hv_freeze
CREATE OR REPLACE VIEW aads_v_dwh_hv_freeze
(
kwartaal,
locatie_code,