AAIT#34503 -- Strukton koppeling geeft time-outs

svn path=/Website/branches/v2015.2/; revision=27061
This commit is contained in:
Arthur Egberink
2015-11-20 09:20:55 +00:00
parent 6550eb58dd
commit d7213fa92c

View File

@@ -83,6 +83,8 @@ var udlstr = 'File Name='+str;
var Oracle = new ActiveXObject("ADODB.Connection");
Oracle.Open(udlstr);
// normaal halen we intervallen van 15 minuten op. Als de koppeling er een tijdje uit gelegen heeft kan dit problemen opleveren. Daarom
// wordt het interval maximaal 4 uur.
var sql = "ALTER SESSION SET nls_territory='AMERICA'";
Oracle.Execute(sql)
sql = "SELECT b.prs_bedrijf_naam, "
@@ -91,16 +93,22 @@ sql = "SELECT b.prs_bedrijf_naam, "
+ " ba.prs_bedrijfadres_password, "
+ " ba.prs_bedrijfadres_url, "
+ " b.prs_overeenkomst_nr, "
+ " decode ( prs_kenmerklink_waarde, null, null, to_char(to_date(prs_kenmerklink_waarde, 'yyyy-mm-dd hh24:mi:ss'), 'yyyy-mm-dd')||'T'||to_char(to_date(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,"
+ " decode (laatste_sync_ts, null, null, to_char(laatste_sync_ts, 'yyyy-mm-dd')||'T'||to_char(laatste_sync_ts, 'hh24:mi:ss')) laatste_sync,"
+ " to_char(nieuwe_sync_ts, 'yyyy-mm-dd') || 'T' || to_char(nieuwe_sync_ts, 'hh24:mi:ss') nieuwe_sync, "
+ " to_char(nieuwe_sync_ts, 'yyyy-mm-dd hh24:mi:ss') nieuwe_ts,"
+ " prs_kenmerklink_key"
+ " FROM prs_bedrijf b, prs_kenmerklink kl, prs_bedrijfadres ba"
+ " FROM prs_bedrijf b, prs_bedrijfadres ba,"
+ " (SELECT prs_link_key, prs_kenmerklink_key, "
+ " fac.safe_to_date (prs_kenmerklink_waarde, 'yyyy-mm-dd hh24:mi:ss') laatste_sync_ts, "
+ " LEAST ( "
+ " fac.safe_to_date (prs_kenmerklink_waarde, 'yyyy-mm-dd hh24:mi:ss') + (4 / 24), " // vorige tijdstip + 4 uur, als we een tijd stil gestaan hebben.
+ " SYSDATE - (1 / 96)) nieuwe_sync_ts " // nu min een kwartier. Om sync problemen te voorkomen kijken we altijd een kwartier terug.
+ " FROM prs_kenmerklink "
+ " WHERE prs_kenmerk_key = 1) kl " // timestamp laatste synchronisatie yyyymmdd hh24mi
+ " WHERE b.prs_bedrijf_key = " + prs_bedrijf_key
+ " AND b.prs_bedrijf_key = ba.prs_bedrijf_key"
+ " AND b.prs_bedrijf_key = kl.prs_link_key"
+ " AND ba.prs_bedrijfadres_type = 'B'" // We (mis)bruiken het technische adres van de bestellingen om de statuswijzigingen op te vragen.
+ " AND prs_kenmerk_key = 1"; // timestamp laatste synchronisatie yyyymmdd hh24mi
+ " AND ba.prs_bedrijfadres_type = 'B'"; // We (mis)bruiken het technische adres van de bestellingen om de statuswijzigingen op te vragen.
WScript.Echo (sql);