FSN#26722 Tracking van bezoekers nu ook gekoppeld aan bez_bezoekers ipv bez_afspraak svn path=/Website/trunk/; revision=18196
52 lines
1.7 KiB
Plaintext
52 lines
1.7 KiB
Plaintext
<%@ LANGUAGE = JavaScript %>
|
|
|
|
<% /*
|
|
$Revision$
|
|
$Id$
|
|
|
|
File: bez_xml.asp
|
|
Description: XML converter for bezoekers/afspraak
|
|
Parameters:
|
|
bez_key: een enkele bezoeker, druk badge af
|
|
of: afspr_key key of the bez_afspraak to convert into XML
|
|
|
|
|
|
Context: bez_show_afspraak.asp of bo-bezoekerslijst
|
|
Note:
|
|
*/ %>
|
|
|
|
<!-- #include file="../Shared/common.inc"-->
|
|
<!-- #include file="../Shared/xml_converter.inc" -->
|
|
<!-- #include file="./bez.inc" -->
|
|
|
|
<%
|
|
var bez_key = getQParamInt("bez_key", -1);
|
|
var dobadge = getQParamInt("badge", 0) == 1;
|
|
|
|
if (bez_key != -1) {
|
|
var sql = "SELECT bez_afspraak_key"
|
|
+ " FROM bez_bezoekers"
|
|
+ " WHERE bez_bezoekers_key = " + bez_key;
|
|
|
|
oRs = Oracle.Execute(sql);
|
|
|
|
var afspr_key = oRs("bez_afspraak_key").value;
|
|
var this_bez = bez.func_enabled_afspraak(afspr_key);
|
|
user.auth_required_or_abort(this_bez.canBadge);
|
|
|
|
//FCLT2XMLResponse({xmlnode: 'afspraak', key: afspr_key, xtrakey: bez_key, srtnotificatie: 'BEZDON'});
|
|
// Raar: bezdon = binnen, en dan komt er een badge-bon. Je zou een logische mechanisme met
|
|
// een parameter oid voor kunnen stellen.
|
|
if (dobadge)
|
|
FCLT2XMLResponse({xmlnode: 'bezoeker', key: bez_key, srtnotificatie: 'BEZBAD'});
|
|
else
|
|
FCLT2XMLResponse({xmlnode: 'bezoeker', key: bez_key});
|
|
}
|
|
else {
|
|
var afspr_key = getQParamInt("afspr_key");
|
|
var this_bez = bez.func_enabled_afspraak(afspr_key);
|
|
user.auth_required_or_abort(this_bez.canReadAny);
|
|
FCLT2XMLResponse({xmlnode: 'afspraak', key: afspr_key});
|
|
}
|
|
%>
|