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

HSLE#66651 Vakgroep -> beperkt aantal behandelteams

Browse Source 
svn path=/Database/trunk/; revision=54233
This commit is contained in:
Alex Tiehuis
2021-12-21 10:43:19 +00:00
parent 7ec876b45d
commit a08f4d9f7b
1 changed files with 30 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

30
FAC/FAC_PACX.SRC
View File

@@ -5010,10 +5010,40 @@ AS
createopentag ('mld_disc_params');
createxmltagvalue ('reminderdays', v_reminderdays);
create_mld_disc_disc_node (p_key);
createclosetag ('mld_disc_params');
END IF;
END;
-- * create_mld_disc_disc_node (mld_discipline_discipline)
PROCEDURE create_mld_disc_disc_node (p_key IN NUMBER)
AS
v_mld_discipline_disc_key mld_discipline_discipline.mld_discipline_discipline_key%TYPE;
v_mld_discipline_key1 mld_discipline_discipline.mld_discipline_key1%TYPE;
v_mld_discipline_key2 mld_discipline_discipline.mld_discipline_key2%TYPE;
BEGIN
IF p_key IS NOT NULL
THEN
createopentag ('discipline_discipline');
SELECT mld_discipline_discipline_key,
mld_discipline_key1,
mld_discipline_key2
INTO v_mld_discipline_disc_key,
v_mld_discipline_key1,
v_mld_discipline_key2
FROM mld_discipline_discipline
WHERE mld_discipline_discipline_key = p_key;
createxmltagvalue ('key', v_mld_discipline_disc_key);
createxmltagvalue ('discipline_key1', v_mld_discipline_key1);
createxmltagvalue ('discipline_key2', v_mld_discipline_key2);
createclosetag ('discipline_discipline');
END IF;
END;
-- * create_MLD_STDMELDING_node
PROCEDURE create_mld_stdmelding_node (p_key IN NUMBER)