61 lines
2.5 KiB
JavaScript
61 lines
2.5 KiB
JavaScript
// --------------------------------------------------------------------------------------
|
|
// A_GetOpdrachten.js
|
|
// Copyright 2014 SG|facilitor. 053-4800 700, helpdesk@sgfacilitor.nl
|
|
// Written by MB (2014)
|
|
//
|
|
|
|
function A_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("ax","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 AX-aannemer-id's) uit Facilitor die geregistreerd zijn voor het aannemersportaal.
|
|
// Het aannemer-id van 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 = A_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, "AX_OPDRACHTEN");
|
|
}
|
|
}
|
|
|
|
|
|
|
|
function A_GetOpdrachten_van_Aannemer(v_supplier_id, v_status_code, v_datum_vanaf, v_datum_tm)
|
|
{
|
|
|
|
var v_API = "GetSupplierTasksSpec";
|
|
var v_req = "<GetSupplierTasksSpec xmlns=\"http://tempuri.org/\">"
|
|
+ " <vendAccountNum>" + v_supplier_id + "</vendAccountNum>"
|
|
+ " <taskStatus>" + v_status_code + "</taskStatus>"
|
|
+ " <startRange>" + v_datum_vanaf + "</startRange>"
|
|
+ " <endRange>" + v_datum_tm + "</endRange>"
|
|
+ " </GetSupplierTasksSpec>";
|
|
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;
|
|
} |