KFNS#57839 Strukton-koppeling tbv. NT-opdrachten

svn path=/Website/branches/v2019.1/; revision=42797
This commit is contained in:
Maarten van der Heide
2019-06-03 10:54:13 +00:00
parent 85b696f8b5
commit d33aebcff7
2 changed files with 28 additions and 9 deletions

View File

@@ -9,7 +9,9 @@
// Twee parameters: UDL voor database connectie en optioneel proxy-ip
var str = WScript.Arguments(0); // udlpath
var prs_bedrijf_key = WScript.Arguments(1); // prs_bedrijf_key
//var prs_bedrijf_key = WScript.Arguments(1); // prs_bedrijf_key
var prs_bedrijf_key = 2504; // Strukton voor zowel NS als NT
var prs_leverancier_nr = WScript.Arguments(1); // Leveranciersnummer tbv. NS of NT
function GetStruktonStatus()
{
@@ -88,7 +90,7 @@ sql = "SELECT b.prs_bedrijf_naam, "
+ " ba.prs_bedrijfadres_certificate, "
+ " ba.prs_bedrijfadres_username, "
+ " ba.prs_bedrijfadres_password, "
+ " b.prs_leverancier_nr, "
//+ " 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, "
@@ -116,7 +118,7 @@ try
laatste_sync = oRs("laatste_sync").Value;
nieuwe_sync = oRs("nieuwe_sync").Value;
nieuwe_ts = oRs("nieuwe_ts").Value;
prs_leverancier_nr = oRs("prs_leverancier_nr").Value;
//prs_leverancier_nr = oRs("prs_leverancier_nr").Value;
prs_kenmerklink_key = oRs("prs_kenmerklink_key").Value;
WScript.Echo("Inlezen statusberichten van bedrijf: " + oRs("prs_bedrijf_naam").Value + " via url: " + mldorder_adres);
oRs.close();

View File

@@ -1,12 +1,29 @@
Echo Starten GetStruktonStatus.js
:koppeling1
Echo Ophalen status/voortgang Strukton Worksphere (NS)
REM cscript GetStruktonStatus.js ../oracle.udl 2504 >>%0.log
cscript GetStruktonStatus.js ../oracle.udl 0000031526 >>%0.log 2>>&1
cscript GetStruktonStatus.js ../oracle.udl 2504 >>gen_import.log
if errorlevel 1 goto fout1
if errorlevel 1 goto fout
cscript ..\..\..\utils\%0\%0.wsf KFNS OPDRSTAT_STRUKTON >>%0.log 2>>&1
cscript ..\..\..\utils\gen_import\gen_import.wsf KFNS OPDRSTAT_STRUKTON >>gen_import.log 2>>&1
goto koppeling2
:fout1
Echo Na NS %0.exe niet meer uitgevoerd>>%0.log
:koppeling2
Echo Ophalen status/voortgang Strukton Worksphere (NT=NedTrain)
REM cscript GetStruktonStatus.js ../oracle.udl 2504 >>%0.log
cscript GetStruktonStatus.js ../oracle.udl 0000032238 >>%0.log 2>>&1
if errorlevel 1 goto fout2
cscript ..\..\..\utils\%0\%0.wsf KFNS OPDRSTAT_STRUKTON >>%0.log 2>>&1
goto einde
:fout
Echo gen_import.exe niet meer uitgevoerd>>gen_import.log
:fout2
Echo Na NT %0.exe niet meer uitgevoerd>>%0.log
:einde