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

QA: nieuwe DB37 velden moeten ook in de XML terugkomen

Browse Source 
svn path=/Database/trunk/; revision=43730
This commit is contained in:
Jos Groot Lipman
2019-08-12 12:59:17 +00:00
parent d14c49cb61
commit 373e9e113d
1 changed files with 26 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

31
FAC/FAC_PACX.SRC
View File

@@ -1662,6 +1662,7 @@ AS
createxmltagvalue ('mailreply', rec.prs_bedrijfadres_replyaddress);
createxmltagvalue ('flexfiles', rec.prs_bedrijfadres_flexfiles);
createxmltagvalue ('encoding', rec.prs_bedrijfadres_encoding);
createxmltagvalue ('charset', rec.prs_bedrijfadres_charset);
createxmltagvalue ('error_handler', rec.prs_bedrijfadres_error_handler);
IF rec.prs_bedrijfadres_authmethod = 3
THEN
@@ -5216,6 +5217,8 @@ AS
v_approved_refiat mld_opdr.mld_opdr_approved_refiat%TYPE;
v_opdr_id mld_opdr.mld_opdr_id%TYPE;
v_opdr_parent_key mld_opdr.mld_opdr_parent_key%TYPE;
v_mld_opdr_externnr mld_opdr.mld_opdr_externnr%TYPE;
v_mld_opdr_externsyncdate mld_opdr.mld_opdr_externsyncdate%TYPE;
CURSOR c1
IS
@@ -5273,7 +5276,9 @@ AS
mld_statusopdr_key_refiat,
mld_opdr_approved_refiat,
mld_opdr_id,
mld_opdr_parent_key
mld_opdr_parent_key,
mld_opdr_externnr,
mld_opdr_externsyncdate
INTO v_mld_melding_key,
v_mld_uitvoerende_keys,
v_typeopdr_key,
@@ -5313,7 +5318,9 @@ AS
v_statusopdr_key_refiat,
v_approved_refiat,
v_opdr_id,
v_opdr_parent_key
v_opdr_parent_key,
v_mld_opdr_externnr,
v_mld_opdr_externsyncdate
FROM mld_opdr o, mld_statusopdr s
WHERE o.mld_statusopdr_key = s.mld_statusopdr_key
AND mld_opdr_key = p_key;
@@ -5350,6 +5357,8 @@ AS
createxmltagvalue ('kosten_refiat', mynumbertochar (v_kosten_refiat));
createxmltagvalue ('statusopdr_key_refiat', v_statusopdr_key_refiat);
createxmltagvalue ('approved_refiat', v_approved_refiat);
createxmltagvalue ('externnr', v_mld_opdr_externnr);
mydatetochar ('externsyncdate', v_mld_opdr_externsyncdate);
create_mld_opdr_kenmerken (p_key);
create_prs_kostenplaats_node (v_prs_kostenplaats_key, FALSE);
createxmltagvalue ('ordernr', v_ordernr);
@@ -6851,6 +6860,9 @@ AS
v_out bez_bezoekers.bez_bezoekers_out%TYPE;
v_pasnr bez_bezoekers.bez_bezoekers_pasnr%TYPE;
v_aanmaak bez_bezoekers.bez_bezoekers_aanmaak%TYPE;
v_telefoon bez_bezoekers.bez_bezoekers_telefoon%TYPE;
v_email bez_bezoekers.bez_bezoekers_email%TYPE;
v_kenteken bez_bezoekers.bez_bezoekers_kenteken%TYPE;
v_parkeerplaats_key res_rsv_deel.res_deel_key%TYPE;
v_parkeer_prijs res_deel.res_deel_prijs%TYPE;
v_parkeer_prijs_vast res_deel.res_deel_prijs_vast%TYPE;
@@ -6874,7 +6886,10 @@ AS
bez_bezoekers_pasnr,
bez_bezoekers_aanmaak,
prs_perslid_key,
prs_contactpersoon_key
prs_contactpersoon_key,
bez_bezoekers_telefoon,
bez_bezoekers_email,
bez_bezoekers_kenteken
INTO v_afspraak_key,
v_afspraak_naam,
v_afspraak_bedrijf,
@@ -6884,7 +6899,10 @@ AS
v_pasnr,
v_aanmaak,
v_perslid_key,
v_contactpersoon_key
v_contactpersoon_key,
v_telefoon,
v_email,
v_kenteken
FROM bez_bezoekers b
WHERE b.bez_bezoekers_key = p_key;
@@ -6898,6 +6916,9 @@ AS
mydatetochar ('out', v_out);
create_bez_kenmerken (p_key);
createxmltagvalue ('pasnr', v_pasnr);
createxmltagvalue ('telefoon', v_telefoon);
createxmltagvalue ('email', v_email);
createxmltagvalue ('kenteken', v_kenteken);
mydatetochar ('aanmaak', v_aanmaak);
-- als zelfstandig aangeroepen, dan moet er nog wel iets van de afspraak bij
create_bez_afspraak_node (v_afspraak_key, -1, TRUE);
@@ -8093,7 +8114,7 @@ AS
END IF;
END LOOP;
IF cols = ''
IF cols IS NULL
THEN
cols := '*';
END IF;