<%@ 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));
%>
