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

    File:               bez_multi_save.asp
    Description:        Sla de wijzigingen van formulier bez_multi.asp op

*/
var JSON_Result = true;
%>
<!--#include file="../Shared/common.inc"-->
<!--#include file="./bez.inc"-->
<%
protectRequest.validateToken();

var afspr_key = getQParamInt("afspr_key"); // Origineel

var this_bez = bez.func_enabled_afspraak(afspr_key);
user.auth_required_or_abort(this_bez.canRead);

var form_dates = getFParamDateArray("newDates");
var new_afspr_keys = [];
for (var i=0; i< form_dates.length; i++)
{
    var datum = form_dates[i];
    var sql = "BEGIN bez.copy_afspraak(" + afspr_key + "," + datum.toSQL() + ", " + user_key + ", NULL, newafspraakkey => ?); END;";
    var oparams = [ { typ: adInteger, dir: adParamOutput } ]; // moet op volgorde van de '?'
    Oracle.ExecuteParam(sql, oparams);
    var new_afspr_key = oparams[0].val;
    new_afspr_keys.push(new_afspr_key);

    // Klantspecifieke check functie (hookfunction) voor de bezoekers die nieuw ontstaan kunnen zijn
    var bezkeyArr = [];
    var sql = "SELECT bez_bezoekers_key"
            + "  FROM bez_bezoekers"
            + " WHERE bez_afspraak_key = " + new_afspr_key;
    var oRs = Oracle.Execute(sql);
    while (!oRs.EOF)
    {
        bezkeyArr.push(oRs("bez_bezoekers_key").Value);
        oRs.MoveNext()
    }
    oRs.Close()
    var pResult = new HookResult();
    if (!custfunc.bez_postsave(bezkeyArr, pResult))
    {
      abort_with_warning(pResult.errmsg);
    }
}
var msg = L("lcl_bez_multi_created").format(form_dates.length);

//if (this_bez.nrPAF > 0)
//    msg += "\n" + L("lcl_bez_paf_not_copied").format(this_bez.nrPAF);

var result = { success: true, message: msg, new_afspr_keys: new_afspr_keys };

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

ASPPAGE_END(); %>
