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

VLKC#62008: Bezoekers aan kunnen melden onder meldingsopdracht.

Browse Source 
svn path=/Database/trunk/; revision=53820
This commit is contained in:
Maykel Geerdink
2021-11-23 15:47:47 +00:00
parent a68f866123
commit a7b9269dbd
1 changed files with 21 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
FAC/FAC_PACX.SRC
View File

@@ -1782,6 +1782,9 @@ AS
createxmltagvalue ('soapversion', rec.prs_bedrijfadres_soapversion);
createxmltagvalue ('soapaction', rec.prs_bedrijfadres_soapaction);
createxmltagvalue ('authmethod', rec.prs_bedrijfadres_authmethod);
createxmltagvalue ('token_url', rec.prs_bedrijfadres_oa_token_url);
createxmltagvalue ('scope', rec.prs_bedrijfadres_oa_scope);
createxmltagvalue ('resource', rec.prs_bedrijfadres_oa_resource);
createxmltagvalue ('district_key', rec.alg_district_key);
createxmltagvalue ('locatie_key', rec.alg_locatie_key);
createxmltagvalue ('mailsender', rec.prs_bedrijfadres_sender);
@@ -4440,6 +4443,7 @@ AS
v_afmelden_extern mld_typeopdr.mld_typeopdr_afmelden_extern%TYPE;
v_isofferte mld_typeopdr.mld_typeopdr_isofferte%TYPE;
v_gvs mld_typeopdr.mld_typeopdr_gvs%TYPE;
v_bez mld_typeopdr.mld_typeopdr_bez%TYPE;
BEGIN
IF p_key IS NOT NULL
THEN
@@ -4460,7 +4464,8 @@ AS
mld_typeopdr_zichtbaarfe,
mld_typeopdr_afmelden_extern,
mld_typeopdr_isofferte,
mld_typeopdr_gvs
mld_typeopdr_gvs,
mld_typeopdr_bez
INTO v_omschrijving,
v_decentraal,
v_kosten,
@@ -4473,7 +4478,8 @@ AS
v_zichtbaarfe,
v_afmelden_extern,
v_isofferte,
v_gvs
v_gvs,
v_bez
FROM mld_typeopdr
WHERE mld_typeopdr_key = p_key;
@@ -4491,6 +4497,7 @@ AS
createxmltagvalue ('afmelden_extern', v_afmelden_extern);
createxmltagvalue ('isofferte', v_isofferte);
createxmltagvalue ('gvs', v_gvs);
createxmltagvalue ('bez', v_bez);
createclosetag ('opdrachttype');
END IF;
END;
@@ -5816,6 +5823,13 @@ AS
SELECT fin_factuur_key
FROM fin_factuur
WHERE mld_opdr_key = p_key;
CURSOR c3
IS
SELECT ba.bez_afspraak_key
FROM bez_afspraak ba
WHERE ba.mld_opdr_key = p_key;
BEGIN
IF p_key IS NOT NULL
THEN
@@ -5981,6 +5995,11 @@ AS
create_mld_opdr_mater_node (rec1.mld_opdr_materiaal_key);
END LOOP;
FOR rec3 IN c3
LOOP
create_bez_afspraak_node (rec3.bez_afspraak_key, NULL, TRUE);
END LOOP;
IF NOT p_concise
THEN
create_mld_melding_node (v_mld_melding_key, p_extra_key, FALSE);