Files
Facilitor/APPL/BEZ/bez_check_out.asp
Peter Feij 413498318a 0-versie
svn path=/Website/trunk/; revision=6
2009-10-05 06:44:06 +00:00

71 lines
1.7 KiB
Plaintext

<%@ language="javascript" %>
<% /*
$Revision: 1 $
$Modtime: 22-09-09 14:47 $
File: bez_check_out.asp
Status: 95%
*/ %>
<%
DOCTYPE_Disable = 1;
%>
<!-- #include file="../../cust/install.inc" -->
<!-- #include file="../Shared/json2.js" -->
<%
/***** Get webform parameters *****/
var bez_key = getFParamInt("bez_key");
var undo_check_out = (getFParam("undo_check_out", 0) == 1);
var message = "";
var checkOutDone = false;
/***** End get webform parameters *****/
var autfunction = "WEB_BEZBOF";
// De functie checkAutorisation(autfunction, true) geeft null terug indien er geen autorisatie voor autfunction wordt gevonden
var authparams = user.checkAutorisation(autfunction, true);
if (authparams)
{
if (undo_check_out)
var bezoekers_out = " TO_DATE(NULL)";
else
var bezoekers_out = " SYSDATE";
sql = "SELECT bez_bezoekers_key"
+ " FROM bez_bezoekers"
+ " WHERE bez_bezoekers_key = " + bez_key
+ " AND bez_bezoekers_done IS NULL";
oRs = Oracle.Execute(sql);
if (!oRs.eof)
{
message = lcl_vis_done_first;
}
else
{
sql = "UPDATE bez_bezoekers"
+ " SET bez_bezoekers_out = " + bezoekers_out
+ " WHERE bez_bezoekers_key = " + bez_key;
oRs = Oracle.Execute(sql);
checkOutDone = true;
// Customer hook
pResult = new HookResult();
custfunc.bez_checkout(bez_key, pResult);
if (pResult.errmsg != null)
{
message = pResult.errmsg;
}
}
}
else
{ // Geen autorisatie
message = lcl_no_auth;
}
var result = {bez_key: bez_key, undo_check_out: undo_check_out, checkOutDone: checkOutDone, message: message};
Response.Write(JSON.stringify(result));
%>