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

ARAI#59648 DWG-coördinaten bij melding

Browse Source 
ARAI#56420 GPS-coördinaten bij melding

svn path=/Database/trunk/; revision=49768
This commit is contained in:
Peter Feij
2021-02-10 17:19:34 +00:00
parent 05875d4120
commit e41ce9cd6e
4 changed files with 71 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

28
FAC/FAC_PACX.SRC
View File

@@ -5169,6 +5169,12 @@ AS
v_naam_ext mld_melding.mld_melding_naam_ext%TYPE;
v_email_ext mld_melding.mld_melding_email_ext%TYPE;
v_tel_ext mld_melding.mld_melding_tel_ext%TYPE;
v_dwgx mld_melding.mld_melding_dwgx%TYPE;
v_dwgy mld_melding.mld_melding_dwgy%TYPE;
v_dwgz mld_melding.mld_melding_dwgz%TYPE;
v_x mld_melding.mld_melding_x%TYPE;
v_y mld_melding.mld_melding_y%TYPE;
v_z mld_melding.mld_melding_z%TYPE;
l_isrootmelding NUMBER(1);
CURSOR c1
@@ -5252,7 +5258,13 @@ AS
mld_melding_kto_key,
mld_melding_naam_ext,
mld_melding_email_ext,
mld_melding_tel_ext
mld_melding_tel_ext,
mld_melding_dwgx,
mld_melding_dwgy,
mld_melding_dwgz,
mld_melding_x,
mld_melding_y,
mld_melding_z
INTO v_meldbron_nr,
v_datum,
v_onderwerp,
@@ -5302,7 +5314,13 @@ AS
v_kto_key,
v_naam_ext,
v_email_ext,
v_tel_ext
v_tel_ext,
v_dwgx,
v_dwgy,
v_dwgz,
v_x,
v_y,
v_z
FROM mld_melding m, mld_statuses s, mld_stdmelding stdm
WHERE m.mld_melding_status = s.mld_statuses_key
AND m.mld_stdmelding_key = stdm.mld_stdmelding_key
@@ -5392,6 +5410,12 @@ AS
FALSE,
FALSE);
END IF;
createxmltagvalue ('dwgx', v_dwgx);
createxmltagvalue ('dwgy', v_dwgy);
createxmltagvalue ('dwgz', v_dwgz);
createxmltagvalue ('x', v_x);
createxmltagvalue ('y', v_y);
createxmltagvalue ('z', v_z);
FOR rec1 IN c1
LOOP