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

svn path=/Website/branches/v2016.1/; revision=30877

Browse Source
This commit is contained in:
Arthur Egberink
2016-09-27 13:48:24 +00:00
parent 5f54b59add
commit 8074cb3d54
1 changed files with 47 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

49
APPL/API/api_mldsoap.asp
View File

@@ -97,6 +97,8 @@ for (i = 0; i < meldingen.length; i++)
var stdmld_sla = -1; // Normale uitvoertijd (prio door melder nog unsupported)
//var meldprio = XMLval(meldingen[i], "prioriteit"); // Unsupported yet
//var meldobj_id = XMLval(meldingen[i], "object"); // Unsupported yet
var voor_email = XMLval(meldingen[i], "voor_email"); // NEW
var voor_login = XMLval(meldingen[i], "voor_login"); // NEW
var meldloc = XMLval(meldingen[i], "locatiecode");
var meldgeb = XMLval(meldingen[i], "gebouwcode");
var meldver = XMLval(meldingen[i], "verdiepingcode");
@@ -150,6 +152,49 @@ for (i = 0; i < meldingen.length; i++)
}
else
{
var voor_key = -1;
var perslid_key = -1;
if (voor_login != null)
{
// Zoek de voorkey op aan de hand van het emailadres
tsql = "SELECT prs_perslid_key "
+ " FROM prs_v_aanwezigperslid "
+ " WHERE prs_perslid_oslogin = UPPER(" + safe.quoted_sql(voor_login) + ")";
var oRs = Oracle.Execute(tsql);
if (!oRs.eof)
{
voor_key = oRs("prs_perslid_key").value;
}
}
if (voor_email != null && voor_key == -1)
{
// Zoek de voorkey op aan de hand van het emailadres
tsql = "SELECT prs_perslid_key "
+ " FROM prs_v_aanwezigperslid "
+ " WHERE UPPER(prs_perslid_email) = UPPER(" + safe.quoted_sql(voor_email) + ")";
var oRs = Oracle.Execute(tsql);
if (!oRs.eof)
{
voor_key = oRs("prs_perslid_key").value;
}
}
if (voor_key == -1)
{
voor_key = user_key;
perslid_key = user_key;
}
else
{
if (S("mld_allow_for_others") == 1)
{
perslid_key = user_key;
}
else
{
perslid_key = voor_key;
}
}
tsql = "SELECT sm.mld_stdmelding_t_uitvoertijd.tijdsduur tijdsduur"
+ " , sm.mld_stdmelding_t_uitvoertijd.eenheid eenheid"
+ " FROM mld_stdmelding sm"
@@ -261,8 +306,8 @@ for (i = 0; i < meldingen.length; i++)
{ dbs: "mld_meldbron_key", typ: "key", val: 6 }, // system
{ dbs: "mld_melding_omschrijving", typ: "varchar", val: meld_oms, len: 4000 },
{ dbs: "prs_kostenplaats_key", typ: "key", val: user.afdeling().prs_kostenplaats_key() },
{ dbs: "prs_perslid_key", typ: "key", val: user_key },
{ dbs: "prs_perslid_key_voor", typ: "key", val: user_key },
{ dbs: "prs_perslid_key", typ: "key", val: perslid_key },
{ dbs: "prs_perslid_key_voor", typ: "key", val: voor_key },
{ dbs: "mld_melding_spoed", typ: "key", val: 3 }, // default (frontend) = 3
{ dbs: "mld_melding_externnr", typ: "varchar", val: ext_id, len: 30 }
]);