<%@language = "javascript" %>
<% /*
     $Revision$
     $Id$

     File:               opdr_setsent.asp
     Description:        Markeren dat een opdracht (waarschijnlijk handmatig)
                         naar de uitvoerende is gestuurd.
     Parameters:
        opdr_key         Opdrachtnummer (key)
*/ %>

<%
var JSON_Result = true;
%>
<!-- #include file="../Shared/common.inc" -->
<!-- #include file="mld.inc" -->
<%
protectRequest.validateToken();
var opdr_key = getFParamInt("opdr_key");
var result = { message: "", success: false };

var this_opdr = mld.func_enabled_opdracht(opdr_key);
user.anything_todo_or_abort(this_opdr.canSetSent, L("lcl_shared_no_auth"));

// Doet markorderassent wel. mld.setopdrachtstatus(opdr_key, 5, null); // Uitgegeven

sql = "BEGIN fac.markorderassent('opdracht', " + opdr_key + ", 2, '', " + user_key + "); END;"; // 2=nog onbekend of leverancier accepteert.
Oracle.Execute(sql);
mld.trackopdrachtupdate(opdr_key, L("lcl_mld_is_setsend")); // Todo; spelvaud uit de lcl-naam halen

result.success = true;

Response.Write(JSON.stringify(result));
%>

<% ASPPAGE_END(); %>
