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

MNNL#62971 Mogelijkheid om bij aanvullen van notities de bron aan te kunnen geven

Browse Source 
svn path=/Database/trunk/; revision=47563
This commit is contained in:
Alex Tiehuis
2020-07-29 13:41:42 +00:00
parent c128abbb41
commit d9b5fedf52
1 changed files with 33 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

33
FAC/FAC_PACX.SRC
View File

@@ -986,6 +986,37 @@ AS
-- * FAC
-- *
PROCEDURE create_fac_note_group_node (p_key IN NUMBER)
AS
CURSOR c1
IS
SELECT fac_note_group_key,
fac_note_group_xmlnode,
fac_note_group_volgnr,
fac_note_group_naam,
fac_note_group_omschrijving
FROM fac_note_group
WHERE fac_note_group_key = p_key
BEGIN
IF p_key IS NOT NULL
THEN
createopentag ('note_groups');
FOR rec1 IN c1
LOOP
createopentag ('note_group');
createxmltagvalue ('key', rec1.fac_note_group_key);
createxmltagvalue ('xmlnode', rec1.fac_note_group_xmlnode);
createxmltagvalue ('naam', rec1.fac_note_group_naam);
createxmltagvalue ('omschrijving',
rec1.fac_note_group_omschrijving);
createclosetag ('note_group');
END LOOP;
createclosetag ('note_groups');
END IF;
END;
PROCEDURE create_fac_tracking_node (pxmlnodename IN VARCHAR2,
p_refkey IN NUMBER)
AS
@@ -3887,6 +3918,7 @@ AS
createxmltagvalue ('omschrijving',
rec1.mld_melding_note_omschrijving);
create_prs_perslid_node (rec1.prs_perslid_key, 'noteur', TRUE);
create_fac_note_group_node(rec1.mld_melding_note_key);
createclosetag ('note');
END LOOP;
@@ -4010,6 +4042,7 @@ AS
createxmltagvalue ('omschrijving',
rec1.mld_opdr_note_omschrijving);
create_prs_perslid_node (rec1.prs_perslid_key, 'noteur', TRUE);
create_fac_note_group_node(rec1.mld_opdr_note_key);
createclosetag ('note');
END LOOP;
createclosetag ('notes');