<%@language = "javascript" %>
<% /*
    $Revision$
    $Id$

    File:           bes_submit.asp
    Description:    De BO kan een opdracht handmatig 'bestellen' (opdrachten aanmaken)
    Parameters:
    Context:
    Note:           Als bes_disc_params_auto_order is gezet gaat dit automatisch

*/ %>

<%
var JSON_Result = true;
%>

<!-- #include file="../Shared/common.inc" -->
<!-- #include file="bes.inc" -->

<%
protectRequest.validateToken();
var bes_key_arr = getFParamIntArray("bes_key");

var result = {};
var tobesubmitted = 0;
var ingesloten = [];
var opdr_key_array = [];
// Bepaal de bestellingen in de selectie die
// ook echt besteld kunnen of mogen worden.
for (var i = 0; i < bes_key_arr.length; i++)
{
  var bes_bestelling = bes.bestelling_info(bes_key_arr[i]); // Globale variabele met alle bes_bestelling informatie
  var bes_disc_info = bes.disc_info(bes_bestelling.dis_key); // alle discipline informatie
  var this_bes = bes.func_enabled_bestelling(bes_bestelling);
  if (this_bes.canSubmit)
  {
    ingesloten.push(bes_key_arr[i]);
    tobesubmitted++;
  }
}
user.anything_todo_or_abort(tobesubmitted > 0); // We klagen niet over enkele wel en enkele niet

//if (this_bes.rfoStatus != 4)
//    user.auth_required_or_abort(this_bes.canSubmit, JSON.stringify({bes_key: bes_key, bes_submit: false, message: "Is al besteld"}));

//user.auth_required_or_abort(this_bes.canSubmit, JSON.stringify({bes_key: bes_key, bes_submit: false, message: L("lcl_bes_can_not_be_ordered")}));

for (var i = 0; i < ingesloten.length; i++)
{
  bes.makeOrders(user_key, ingesloten[i]);
  // Zodra bij een bes_bestelling_item de bes_bestelopdr_item wordt ingevuld
  // wordt bij de bes_bestelling automatisch de status op 5, besteld gezet

  // Zoek de opdracht
  var sql = "SELECT DISTINCT boi.bes_bestelopdr_key "
          + "  FROM bes_bestelling_item bi, bes_bestelopdr_item boi"
          + " WHERE bi.bes_bestelopdr_item_key=boi.bes_bestelopdr_item_key"
          + "   AND bi.bes_bestelling_key = " + ingesloten[i];
  var oRs = Oracle.Execute(sql);
  var opdr_key = oRs("bes_bestelopdr_key").value;
  opdr_key_array.push(opdr_key);
}

if (S("mld_order_autoprint") == 1)
  var result = { mld_order_autoprint: 1, opdr_key_array: opdr_key_array, bes_key_array: ingesloten, success: true};
else
  var result = { mld_order_autoprint: 0, opdr_key_array: opdr_key_array, bes_key_array: ingesloten, success: true};

Response.Write(JSON.stringify(result));
%>
<% ASPPAGE_END(); %>