40 lines
1.2 KiB
Plaintext
40 lines
1.2 KiB
Plaintext
<%@ language = "JavaScript" %>
|
|
<% /*
|
|
$Revision$
|
|
$Id$
|
|
File: mld_statusupdate.asp
|
|
Description: A deeplink call to freeze all orders for a specific 'Uitvoerende'.
|
|
Parameters:
|
|
uv_key Id of the prs_bedrijf_key for 'Uitvoerende'
|
|
uv_naam Name of the prs_bedrijf_key for 'Uitvoerende'
|
|
Context: Client specific file to handle actions on (UV-)order as initiated
|
|
from a report only accessible for autorized employees.
|
|
Note:
|
|
*/ %>
|
|
<%
|
|
DOCTYPE_Disable = 1;
|
|
%>
|
|
<!--#include file="../../appl/Shared/common.inc"-->
|
|
<!-- #include file="../../appl/Shared/json2.js" -->
|
|
<!-- #include file="../../appl/Shared/funcodes.inc" -->
|
|
<%
|
|
message = "";
|
|
var uv_key = getQParamInt("uv_key");
|
|
var uv_naam = getQParam("uv_naam","");
|
|
|
|
if (func_enabled["WEB_USER01"]) {
|
|
message = "Periode voor " + uv_naam + " afgesloten.";
|
|
|
|
// AV-verklaren; ALLEEN door geautoriseerde WTC-medewerkers!
|
|
sql = "BEGIN WTCA.freezeopdrachten (" + uv_key + "); END;";
|
|
Oracle.Execute(sql);
|
|
}
|
|
else {
|
|
message = L("lcl_no_auth");
|
|
}
|
|
|
|
result = { success : true, message : message }
|
|
|
|
Response.Write(JSON.stringify(result));
|
|
%>
|