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

YKPN#75960 -- Aanpassing Cirfood export

Browse Source 
svn path=/Customer/trunk/; revision=58451
This commit is contained in:
Norbert Wassink
2022-12-22 15:26:06 +00:00
parent 17a8b75ccb
commit d75b59a56e
1 changed files with 24 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

32
YKPN/ykpn.sql
View File

@@ -12895,7 +12895,7 @@ AS
REPLACE (REPLACE (sn.fac_srtnotificatie_oms, '##LEV##', v.prs_bedrijf_naam), '##MND##', v.maand) text,
r.fac_usrrap_key key,
v.extra_key xkey,
'gerlinda.vanlangevelde@yask.nl;Shahla.Eleveld@yask.nl;soukaina.elmaadory@yask.nl;omar.murselovic@yask.nl' xemail,
'Shahla.Eleveld@yask.nl;soukaina.elmaadory@yask.nl;omar.murselovic@yask.nl' xemail,
NULL mobile
FROM ykpn_v_frozen_fact v,
fac_usrrap r,
@@ -14084,21 +14084,25 @@ AS
rra.res_rsv_artikel_levering van,
ra.res_artikel_btw btw,
rra.res_rsv_artikel_prijs totprijs,
ra.res_artikel_prijs prijs
ra.res_artikel_prijs prijs,
rd.ins_discipline_omschrijving catalogus
FROM res_rsv_artikel rra,
res_artikel ra
res_artikel ra,
res_discipline rd
WHERE rra.res_rsv_ruimte_key=p_rrr_key
AND rra.res_artikel_key = ra.res_artikel_key
AND rra.res_status_bo_key = 5 -- afgemeld
AND rra.res_rsv_artikel_verwijder IS NULL
AND ra.res_artikel_btw IN (0, 9, 21);
AND ra.res_artikel_btw IN (0, 9, 21)
AND rd.ins_discipline_key=ra.res_discipline_key;
v_bestand VARCHAR2(20);
v_shop_token VARCHAR2(50);
v_contact_email VARCHAR2(50);
v_debitor_value VARCHAR2(20);
v_counter NUMBER;
v_artikelprijs NUMBER;
BEGIN
v_bestand :='CIRF-EX';
v_counter:=0;
@@ -14163,10 +14167,22 @@ BEGIN
ykpn.add_xml_element (v_bestand, 'Description',rec_art.artikel_omschrijving);
ykpn.add_xml_element (v_bestand, 'Reference',rec_art.artikelnr);
ykpn.add_xml_row(v_bestand, '</Item>');
ykpn.add_xml_element (v_bestand, 'QuantityOrdered',rec_art.aantal);
v_artikelprijs:=0;
IF UPPER(rec_art.catalogus) = 'CIRFOOD - MAATWERK'
THEN
v_artikelprijs := rec_art.totprijs/rec_art.aantal;
ELSE
v_artikelprijs := rec_art.prijs;
END IF;
ykpn.add_xml_element (v_bestand, 'QuantityOrdered',rec_art.aantal);
ykpn.add_xml_row(v_bestand, '<Price>');
ykpn.add_xml_element (v_bestand, 'NetPrice',rec_art.prijs);
ykpn.add_xml_element (v_bestand, 'BrtPrice',ROUND(rec_art.prijs*(1+rec_art.btw/100),2));
ykpn.add_xml_element (v_bestand, 'NetPrice',v_artikelprijs);
ykpn.add_xml_element (v_bestand, 'BrtPrice',ROUND(v_artikelPrijs*(1+rec_art.btw/100),2));
ykpn.add_xml_element (v_bestand, 'Currency','EUR');
ykpn.add_xml_element (v_bestand, 'VatPercentage',rec_art.btw);
ykpn.add_xml_row(v_bestand, '</Price>');