37 lines
1.1 KiB
Plaintext
37 lines
1.1 KiB
Plaintext
<%@language = "javascript" %>
|
|
<% /*
|
|
$Revision$
|
|
$Id$
|
|
|
|
File: opdr_setsend.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="../Shared/json2.js" -->
|
|
<!-- #include file="mld.inc" -->
|
|
<%
|
|
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.canSend, JSON.stringify({ opdr_key: opdr_key, message: 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"));
|
|
|
|
result.success = true;
|
|
|
|
Response.Write(JSON.stringify(result));
|
|
%>
|
|
|