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

FBEA#71733 Het maken van een reservering vanuit een melding

Browse Source 
svn path=/Database/trunk/; revision=56718
This commit is contained in:
Peter Feij
2022-07-29 10:22:14 +00:00
parent 0517380f1c
commit f811f3ff83
2 changed files with 25 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
FAC/FAC_PACX.SRC
View File

@@ -5373,6 +5373,11 @@ AS
AND ms.mld_melding_start_key = m1.mld_melding_start_key
AND ms.mld_melding_key <> p_key
AND m1.mld_melding_key = p_key;
CURSOR c5
IS
SELECT res_reservering_key
FROM res_reservering
WHERE mld_melding_key = p_key;
BEGIN
IF p_key IS NOT NULL
THEN
@@ -5614,6 +5619,10 @@ AS
LOOP
create_bes_bestelling_node (rec3.bes_bestelling_key, FALSE); -- concise bevat geen artikelen
END LOOP;
FOR rec5 IN c5
LOOP
create_res_reservering_node (rec5.res_reservering_key, NULL);
END LOOP;
FOR grp IN (SELECT mld_melding_key
FROM mld_melding
WHERE mld_melding_mldgroup_key = p_key)
@@ -8705,6 +8714,8 @@ AS
v_aanmaak res_reservering.res_reservering_aanmaak%TYPE;
v_verwijder res_reservering.res_reservering_verwijder%TYPE;
v_reservering_key res_reservering.res_reservering_key%TYPE;
v_melding_key res_reservering.res_melding_key%TYPE;
v_ispool res_reservering.res_reservering_ispool%TYPE;
v_externnr res_reservering.res_reservering_externnr%TYPE;
v_externsyncdate res_reservering.res_reservering_externsyncdate%TYPE;
v_nrdeelres NUMBER;
@@ -8796,10 +8807,14 @@ AS
SELECT res_reservering_aanmaak
, res_reservering_verwijder
, res_reservering_ispool
, mld_melding_key
, res_reservering_externnr
, res_reservering_externsyncdate
INTO v_aanmaak
, v_verwijder
, v_ispool
, v_melding_key
, v_externnr
, v_externsyncdate
FROM res_reservering r
@@ -8808,6 +8823,8 @@ AS
createxmltagvalue ('key', v_reservering_key);
mydatetochar ('datum', v_aanmaak);
mydatetochar ('verwijder', v_verwijder);
createxmltagvalue ('ispool', v_ispool);
create_mld_melding_node (v_melding_key, NULL, TRUE);
createxmltagvalue ('externnr', v_externnr);
mydatetochar ('externsyncdate', v_externsyncdate);