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

AASA#58219 -- Bundeling Catering aanvulling procedure

Browse Source 
svn path=/Customer/trunk/; revision=43126
This commit is contained in:
Jos Migo
2019-06-27 13:10:25 +00:00
parent cbc70af2c9
commit c0b231b70c
1 changed files with 6 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
AA/AASA/aasa.sql
View File

@@ -163,7 +163,7 @@ BEGIN
v_errormsg := 'Bepaal einddatum';
-- wat is de eerste dag van de huidige maand
v_date := TO_DATE (TO_CHAR (SYSDATE, 'yyyymm') || '01', 'yyyymmdd');
v_date := TO_DATE (TO_CHAR (SYSDATE, 'yyyymm') || '01', 'yyyymmdd');
v_month := REPLACE(TO_CHAR (v_date-1, 'month-yyyy', 'NLS_DATE_LANGUAGE = ''dutch'''), ' ', '');
SELECT COUNT (mld_opdr_key)
@@ -312,8 +312,10 @@ BEGIN
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 aasa_v_catering_kpn c
WHERE res_rsv_artikel_levering < v_date
AND COALESCE(c.bu_kostenplaats_key, -1) = COALESCE(rec.bu_kostenplaats_key, -1);
WHERE res_rsv_artikel_levering < v_date
AND COALESCE(c.bu_kostenplaats_key, -1) = COALESCE(rec.bu_kostenplaats_key, -1)
AND c.prs_bedrijf_key = rec1.prs_bedrijf_key -- ivm probleem 58219
;
v_errormsg := 'Pas de status van de artikelen aan ' || v_mld_opdr_key;
UPDATE res_rsv_artikel rra
@@ -335,7 +337,7 @@ BEGIN
fac.writelog (p_applname, 'E', v_errormsg, '');
END;
ELSE
ELSE
fac.writelog (p_applname, 'E', 'Een bedrag van: ' || rec.prijs || ' euro kan niet aan een kostenplaats gekoppeld worden!', '');
END IF;
END;