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

YAXX#83574 P2P Documentdate in de Exact koppeling moet weer de huidige datum bevatten ipv de boekmaand.

Browse Source 
svn path=/Customer/trunk/; revision=67103
This commit is contained in:
Arthur Egberink
2024-11-19 16:25:43 +00:00
parent 5877aa6f10
commit a746c7c61b
1 changed files with 20 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
VBXX/vbxx.sql
View File

@@ -39,6 +39,9 @@ AS
FUNCTION bepaal_fin_district (p_fin_key IN NUMBER)
RETURN NUMBER;
FUNCTION bepaal_opdr_district (p_opdr_key IN NUMBER)
RETURN NUMBER;
FUNCTION bepaal_fin_gebouw (p_fin_key IN NUMBER)
RETURN NUMBER;
@@ -341,6 +344,21 @@ AS
RETURN v_district_key;
END;
-- deze functie bepaald aan de hand van de opdracht het district
FUNCTION bepaal_opdr_district (p_opdr_key IN NUMBER)
RETURN NUMBER
AS
v_district_key NUMBER;
BEGIN
SELECT alg_district_key
INTO v_district_key
FROM mld_opdr o, mld_melding m, alg_locatie l
WHERE o.mld_opdr_key = p_opdr_key
AND o.mld_melding_key = m.mld_melding_key
AND m.mld_alg_locatie_key = l.alg_locatie_key;
RETURN v_district_key;
END;
-- deze functie bepaald aan de hand van de factuur_key het gebouw.
FUNCTION bepaal_fin_gebouw (p_fin_key IN NUMBER)
RETURN NUMBER
@@ -4099,7 +4117,7 @@ BEGIN
vbxx.add_xml_row (v_bestand, '<GLEntry status="E" entry="' || xml.char_to_html(v_boekstuknummer) || '">');
vbxx.add_xml_element (v_bestand, 'Description', rec.oms_kop);
vbxx.add_xml_element (v_bestand, 'Date', rec.datum);
vbxx.add_xml_element (v_bestand, 'DocumentDate', rec.datum );
vbxx.add_xml_element (v_bestand, 'DocumentDate', TO_CHAR(SYSDATE, 'YYYY-MM-DD'));
vbxx.add_xml_row (v_bestand, '<Journal type="I" code="' || p_dagboek || '"/>');
v_sub_count := 1;
FOR rec1 IN c_sub (v_crdnr, v_factuur_nr)
@@ -4135,7 +4153,7 @@ BEGIN
vbxx.add_xml_row (v_bestand, '</Payment>');
vbxx.add_xml_row (v_bestand, '<FinReferences>');
vbxx.add_xml_element (v_bestand, 'YourRef', rec.factuur_nr || ' ' || rec1.fin_factuur_debiteur_nr);
vbxx.add_xml_element (v_bestand, 'DocumentDate', rec1.fin_factuur_boekmaand || '-01');
vbxx.add_xml_element (v_bestand, 'DocumentDate', TO_CHAR(SYSDATE, 'YYYY-MM-DD'));
vbxx.add_xml_row (v_bestand, '</FinReferences>');
-- Voeg de bijlage toe