admin/Facilitor
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

KFNS#57839 Strukton-koppeling tbv. NT-opdrachten

Browse Source 
svn path=/Website/branches/v2019.1/; revision=42803
This commit is contained in:
Maarten van der Heide
2019-06-03 12:35:32 +00:00
parent 571f8447ba
commit 00e5ae2152
1 changed files with 10 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
CUST/KFNS/import/GetStruktonStatus.js
View File

@@ -50,7 +50,7 @@ function GetStruktonStatus()
objXMLHTTP.send(XMLReq);
dataReceived = false;
if (objXMLHTTP.status==200)
if (objXMLHTTP.status == 200)
{ // Geldigheid XML wordt gecontroleerd door GEN_IMPORT
WScript.Echo("Gelukt, status = " + objXMLHTTP.status);
responseText = "" + objXMLHTTP.responseText;
@@ -66,9 +66,15 @@ function GetStruktonStatus()
oStream.SaveToFile (fileName, 2); // adSaveCreateOverWrite
oStream.Close();
}
sql = "UPDATE prs_kenmerklink SET prs_kenmerklink_waarde = '" + nieuwe_ts + "' WHERE prs_kenmerklink_key = " + prs_kenmerklink_key;
WScript.Echo (sql);
Oracle.Execute(sql);
// LET OP/Heel smerig (bij gebrek aan een betere oplossing):
// Omdat dezelfde Uitvoerende wordt gebruikt voor zowel NS als NT (met verschillende nummers),
// werk ik het 'Tijdstip laatste synchronisatie' alleen bij na ophalen van de statusberichten
// met het laatste nummer (voor NT).
if (prs_leverancier_nr == 0000032238) {
sql = "UPDATE prs_kenmerklink SET prs_kenmerklink_waarde = '" + nieuwe_ts + "' WHERE prs_kenmerklink_key = " + prs_kenmerklink_key;
WScript.Echo (sql);
Oracle.Execute(sql);
}
}
else
{