// --------------------------------------------------------------------------------------
// T_GetOpdrachten.js
// Copyright 2014 SG|facilitor. 053-4800 700,  helpdesk@sgfacilitor.nl
// Written by MB (2014)
//

function T_GetOpdrachten()
{
    var v_status_code = "o"; // open
    var l_currentTime = new Date();
    // l_aantal_dagen staat default/normaal op 1 (voor gisteren), dus alle opdrachten vanaf gisteren. Voor testdoeleinden kan dit wat opgerekt worden...
    // var l_aantal_dagen = 1;
    var l_aantal_dagen = Read_Ini_Setting("tobias","opdr_past_days");
    var l_yesterday = new Date((new Date()).valueOf() - l_aantal_dagen*1000*60*60*24);
    var v_datum_vanaf = jsdatextoxml(l_yesterday);
    var v_datum_tm = jsdatextoxml(l_currentTime);
    
    var v_xml_opdrachten;
    
    // Haal de aannemers (feitelijk de Tobias/AX-aannemer-id's) uit Facilitor die geregistreerd zijn voor het aannemersportaal.
    // Het aannemer-id van Tobias/AX wordt uit Facilitor uitgelezen, en per aannemer wordt de webservice om de opdrachten van die aannemer op te halen, aangeroepen...
    l_suppl_array = F_GetSuppliers();
    for (var i = 0; i < l_suppl_array.length; i++){
        v_supplier_id = l_suppl_array[i];
        
        // Ophalen van de opdrachten voor aannemer 'v_supplier_id' vanaf (default) gisteren tot en met nu.
        v_xml_opdrachten = T_GetOpdrachten_van_Aannemer(v_supplier_id, v_status_code, v_datum_vanaf, v_datum_tm);

        // Wegschrijven van de opdrachten (voor aannemer 'v_supplier_id') naar Facilitor....
        api_F_PutOpdrachten(v_xml_opdrachten, "TOBIAS_OPDRACHTEN");
    }
}



function T_GetOpdrachten_van_Aannemer(v_supplier_id, v_status_code, v_datum_vanaf, v_datum_tm)
{


var v_API = "GetBonnen";
var v_req = "<tob:string>CrediteurNummer=" + v_supplier_id + "</tob:string>"
					+ "<tob:string>BonStatus=" + v_status_code + "</tob:string>"
					+ "<tob:string>BonDatumOpdrachtVan=" + v_datum_vanaf + "</tob:string>"


var v_type = 0;

var v_resp = apiAX(v_API, v_req, v_type);


//if (v_type == 1 && v_resp != "")
//    {
//    oStream = new ActiveXObject("ADODB.Stream");
//    oStream.Open();
//    oStream.Type = 1; // adTypeBinary
//    oStream.Write(v_resp); // responseText geeft encoding problemen!
//    oStream.SaveToFile ("Log/test" + v_supplier_id + ".xml", 2); 
//    oStream.Close();
//   }
return v_resp;
}