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=42807
This commit is contained in:
Maarten van der Heide
2019-06-03 14:42:01 +00:00
parent 4d99f66dd6
commit f6664a0c96
1 changed files with 31 additions and 31 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -15,20 +15,20 @@ var prs_leverancier_nr = WScript.Arguments(1); // Leveranciersnummer tbv. NS of
function GetStruktonStatus()
{
var XMLReq= "<soapenv:Envelope xmlns:soapenv=\"http://schemas.xmlsoap.org/soap/envelope/\">"
+" <soapenv:Header/>"
+" <soapenv:Body>"
+" <GetServiceRequestStatusPlus>"
+" <Status>"
+" <CustomerID>" + prs_leverancier_nr + "</CustomerID>"
+" <ReferenceID></ReferenceID>"
+" <ServiceRequestID></ServiceRequestID>"
+" <BeginDateTime>"+ laatste_sync +"</BeginDateTime>"
+" <EndDateTime>"+ nieuwe_sync +"</EndDateTime>"
+" </Status>"
+" </GetServiceRequestStatusPlus>"
+" </soapenv:Body>"
+"</soapenv:Envelope>";
var XMLReq = "<soapenv:Envelope xmlns:soapenv=\"http://schemas.xmlsoap.org/soap/envelope/\">"
+ " <soapenv:Header/>"
+ " <soapenv:Body>"
+ " <GetServiceRequestStatusPlus>"
+ " <Status>"
+ " <CustomerID>" + prs_leverancier_nr + "</CustomerID>"
+ " <ReferenceID></ReferenceID>"
+ " <ServiceRequestID></ServiceRequestID>"
+ " <BeginDateTime>"+ laatste_sync +"</BeginDateTime>"
+ " <EndDateTime>"+ nieuwe_sync +"</EndDateTime>"
+ " </Status>"
+ " </GetServiceRequestStatusPlus>"
+ " </soapenv:Body>"
+ "</soapenv:Envelope>";
WScript.Echo("Bericht = " + XMLReq);
//WScript.Echo("Login = " + uname);
//WScript.Echo("Wachtwoord = " + pword);
@@ -70,7 +70,7 @@ function GetStruktonStatus()
// 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) {
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);
@@ -91,22 +91,22 @@ Oracle.Open(udlstr);
var sql = "ALTER SESSION SET nls_territory='AMERICA'";
Oracle.Execute(sql)
sql = "SELECT b.prs_bedrijf_naam, "
+ " ba.prs_bedrijfadres_url, "
+ " ba.prs_bedrijfadres_certificate, "
+ " ba.prs_bedrijfadres_username, "
+ " ba.prs_bedrijfadres_password, "
//+ " b.prs_leverancier_nr, "
+ " decode (kl.prs_kenmerklink_waarde, null, null, to_char(to_date(kl.prs_kenmerklink_waarde, 'yyyy-mm-dd hh24:mi:ss'), 'yyyy-mm-dd')||'T'||to_char(to_date(kl.prs_kenmerklink_waarde, 'yyyy-mm-dd hh24:mi:ss'), 'hh24:mi:ss')) laatste_sync, "
+ " to_char(sysdate - (1/96), 'yyyy-mm-dd') || 'T' || to_char(sysdate - (1/96), 'hh24:mi:ss') nieuwe_sync, "
+ " to_char(sysdate - (1/96), 'yyyy-mm-dd hh24:mi:ss') nieuwe_ts, "
+ " kl.prs_kenmerklink_key"
+ " FROM prs_bedrijf b, prs_bedrijfadres ba, prs_kenmerklink kl"
+ " WHERE b.prs_bedrijf_key = " + prs_bedrijf_key
+ " AND b.prs_bedrijf_key = ba.prs_bedrijf_key"
+ " AND ba.prs_bedrijfadres_type = 'B'" // Was 'O' + " AND ba.mld_typeopdr_key = 281"
+ " AND b.prs_bedrijf_key = kl.prs_link_key"
+ " AND kl.prs_kenmerk_key = 1020"; // Tijdstip laatste synchronisatie
sql = "SELECT b.prs_bedrijf_naam, "
+ " ba.prs_bedrijfadres_url, "
+ " ba.prs_bedrijfadres_certificate, "
+ " ba.prs_bedrijfadres_username, "
+ " ba.prs_bedrijfadres_password, "
//+ " b.prs_leverancier_nr, "
+ " decode (kl.prs_kenmerklink_waarde, null, null, to_char(to_date(kl.prs_kenmerklink_waarde, 'yyyy-mm-dd hh24:mi:ss'), 'yyyy-mm-dd')||'T'||to_char(to_date(kl.prs_kenmerklink_waarde, 'yyyy-mm-dd hh24:mi:ss'), 'hh24:mi:ss')) laatste_sync, "
+ " to_char(sysdate - (1/96), 'yyyy-mm-dd') || 'T' || to_char(sysdate - (1/96), 'hh24:mi:ss') nieuwe_sync, "
+ " to_char(sysdate - (1/96), 'yyyy-mm-dd hh24:mi:ss') nieuwe_ts, "
+ " kl.prs_kenmerklink_key"
+ " FROM prs_bedrijf b, prs_bedrijfadres ba, prs_kenmerklink kl"
+ " WHERE b.prs_bedrijf_key = " + prs_bedrijf_key
+ " AND b.prs_bedrijf_key = ba.prs_bedrijf_key"
+ " AND ba.prs_bedrijfadres_type = 'B'" // Was 'O' + " AND ba.mld_typeopdr_key = 281"
+ " AND b.prs_bedrijf_key = kl.prs_link_key"
+ " AND kl.prs_kenmerk_key = 1020"; // Tijdstip laatste synchronisatie
WScript.Echo (sql);