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

YKPN#51761 -- Parkeerplaats autorisatie

Browse Source 
svn path=/Website/branches/v2017.2/; revision=37093
This commit is contained in:
Arthur Egberink
2018-02-20 21:42:00 +00:00
parent b455ce4acd
commit 7a241ea337
2 changed files with 173 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

62
CUST/YKPN/bez_statusupdate.asp Normal file
View File

@@ -0,0 +1,62 @@
<%@ language = "JavaScript" %>
<% /*
$Revision$
$Id$
File: bez_statusupdate.asp
Description: A deeplink call from the reports section of Facilitor to accept or reject parking place requests.
Parameters:
bez_bezoekers_key Id of the visitor
bez_info Information that will be logged in the notification
bez_status Key of mld_statusses
Context: Client specific file to handle a deeplink call.
Note:
*/ %>
<%
DOCTYPE_Disable = 1;
%>
<!--#include file="../../appl/Shared/common.inc"-->
<!-- #include file="../../appl/Shared/json2.js" -->
<!-- #include file="../../appl/Shared/funcodes.inc" -->
<%
{
message = "";
var res_rsv_deel_key = -1
var bez_bezoekers_key = getQParamInt("bez_bezoekers_key", -1);
var bez_info = getQParam("bez_info","");
var bez_status = getQParamInt("bez_status", -1);
__Log('voor select');
sql = " SELECT res_rsv_deel_key FROM res_rsv_deel rrd "
+ " WHERE rrd.bez_bezoekers_key = " + bez_bezoekers_key;
oRs = Oracle.Execute(sql);
if (!oRs.eof) {
// parkeerplaats is gevonden
res_rsv_deel_key = oRs(0).value;
}
else {
result = { success : false, message : "Geen geldige parkeerplaats" }
Response.Write(JSON.stringify(result));
}
if (bez_status == 1) // Goedkeuren
{
shared.trackaction("CUST04", bez_bezoekers_key);
// set kenmerk goedgekeurd door
// stuur notificatie
}
else // afwijzen
{
// verwijder parkeerplaats
sql = "DELETE res_rsv_deel WHERE res_rsv_deel_key = " + res_rsv_deel_key;
Oracle.Execute(sql);
// sla reden voor afwijzing op
sql = "BEGIN ykpn.set_kenmerk('BEZ', 1161, " + bez_bezoekers_key + ", " + safe.quoted_sql(bez_info) + ", 0); END;" // reden afwijzing
Oracle.Execute(sql);
// en stuur een notificatie uit.
shared.trackaction("CUST05", bez_bezoekers_key);
}
result = { success : true, message : message };
Response.Write(JSON.stringify(result));
}
%>

111
CUST/YKPN/xsl/ykpn.xsl
View File

@@ -1349,6 +1349,117 @@ function startAutoRefreshTim() {
</body>
</html>
</xsl:if>
<xsl:if test="@view='YKPN_V_RAP_GOEDKEURING_PP' or @view='ykpn_v_rap_goedkeuring_pp'">
<script>
<xsl:text disable-output-escaping="yes">
function run_afwijzen (bez_bezoekers_key) {
l_id = 'reden_' + bez_bezoekers_key;
l_obj = document.getElementById (l_id);
$.post('../../cust/ykpn/bez_statusupdate.asp?bez_bezoekers_key=' + bez_bezoekers_key + '&amp;bez_status=0&amp;bez_info=' + l_obj.value, {}, FcltCallbackRefresh, "json");
}
</xsl:text>
</script>
<table width="100%" class="DefResultsetTable" border="1" cellpadding="0" cellspacing="0">
<xsl:if test="count(rapport_data/data_row)=0">
<tr>
<td>
<center>
<b>Geen gegevens gevonden</b>
</center>
</td>
</tr>
</xsl:if>
<xsl:variable name="sorted">
<xsl:for-each select="rapport_data/data_row">
<xsl:sort select="BEZ_AFSPRAAK_DATUM"/>
<xsl:copy-of select="."/>
</xsl:for-each>
</xsl:variable>
<xsl:for-each select="msxml:node-set($sorted)/data_row">
<xsl:if test="position() = 1">
<tr>
<th class="DefResultsetHeading" style="text-align:left">Datum</th>
<th class="DefResultsetHeading" style="text-align:left">Tot</th>
<th class="DefResultsetHeading" style="text-align:left">Gastheer</th>
<th class="DefResultsetHeading" style="text-align:left">Naam</th>
<th class="DefResultsetHeading" style="text-align:left">Bedrijf</th>
<th class="DefResultsetHeading" style="text-align:left">Locatie</th>
<th class="DefResultsetHeading" colspan="2" style="text-align:center">Accepteren / Afwijzen / Details</th>
</tr>
</xsl:if>
<tr>
<td class="DRR" style="text-align:left">
<xsl:value-of select="substring-before(BEZ_AFSPRAAK_DATUM, 'T')"/><br/><xsl:value-of select="substring-after(BEZ_AFSPRAAK_DATUM, 'T')"/>
<xsl:if test="$mode != 'excel'">&#xA0;</xsl:if>
</td>
<td class="DRR" style="text-align:left">
<xsl:value-of select="substring-after(BEZ_AFSPRAAK_EIND, 'T')"/>
<xsl:if test="$mode != 'excel'">&#xA0;</xsl:if>
</td>
<td class="DRR" style="text-align:left">
<xsl:value-of select="BEZ_AFSPRAAK_GASTHEER"/>
<xsl:if test="$mode != 'excel'">&#xA0;</xsl:if>
</td>
<td class="DRR" style="text-align:left">
<xsl:value-of select="BEZ_AFSPRAAK_NAAM"/>
<xsl:if test="$mode != 'excel'">&#xA0;</xsl:if>
</td>
<td class="DRR" style="text-align:left">
<xsl:value-of select="BEZ_AFSPRAAK_BEDRIJF"/>
<xsl:if test="$mode != 'excel'">&#xA0;</xsl:if>
</td>
<td class="DRR" style="text-align:left">
<xsl:value-of select="ALG_LOCATIE_OMSCHRIJVING"/>
<xsl:if test="$mode != 'excel'">&#xA0;</xsl:if>
</td>
<td class="DRR" style="text-align:left">Reden voor afwijzing:<br/>
<xsl:element name="textarea">
<xsl:attribute name="id">reden_<xsl:value-of select="BEZ_BEZOEKERS_KEY"/></xsl:attribute>
<xsl:attribute name="type">textarea</xsl:attribute>
<xsl:attribute name="cols">40</xsl:attribute>
<xsl:attribute name="rows">3</xsl:attribute>
</xsl:element>
</td>
<td class="DRR" style="text-align:left">
<table width="100%" cellpadding="0" cellspacing="0">
<tr>
<xsl:element name="td">
<xsl:attribute name="colspan">2</xsl:attribute>
<xsl:attribute name="class">DRR</xsl:attribute>
<xsl:attribute name="title">link voor accepteren aanvraag</xsl:attribute>
<xsl:attribute name="style">{ cursor: hand; border:none; text-align:right; }</xsl:attribute>
<xsl:attribute name="onclick">$.post('../../cust/ykpn/bez_statusupdate.asp?bez_bezoekers_key=<xsl:value-of select="BEZ_BEZOEKERS_KEY"/>&amp;bez_status=1', {}, FcltCallbackRefresh, "json");</xsl:attribute>
<u>Accepteren</u>
</xsl:element>
</tr>
<tr>
<td>&#xA0;</td>
</tr>
<tr>
<xsl:element name="td">
<xsl:attribute name="class">DRR</xsl:attribute>
<xsl:attribute name="title">link voor afwijzen aanvraag</xsl:attribute>
<xsl:attribute name="style">{ cursor: hand; border:none; text-align:right; }</xsl:attribute>
<xsl:attribute name="onclick">run_afwijzen (<xsl:value-of select="BEZ_BEZOEKERS_KEY"/>)</xsl:attribute>
<u>Afwijzen</u>
</xsl:element>
</tr>
</table>
</td>
</tr>
</xsl:for-each>
</table>
</xsl:if>
</xsl:template>
</xsl:stylesheet>
<!-- Stylesheet edited using Stylus Studio - (c) 2004-2007. Progress Software Corporation. All rights reserved. -->