DENB#56525 Beaufort import ging vroeger (toen DENB licentie klant was) rechtstreeks met hun SQL-server maar sinds ze op SaaS zitten via de PRSIMP-import API

svn path=/Website/branches/v2018.2/; revision=40896
This commit is contained in:
Jos Groot Lipman
2019-02-11 16:15:51 +00:00
parent 591ffd58f0
commit b74efca950
3 changed files with 0 additions and 35 deletions

Binary file not shown.

View File

@@ -1,27 +0,0 @@
var csvfilename = "PRS-Beaufort.csv";
var Oracle = new ActiveXObject("ADODB.Connection");
var str = 'File Name=.\\beaufort.udl';
Oracle.Open(str);
ttTot = new Date();
sql = "SELECT PERSONEELSNUMMER||';'||NAAM||';'||TUSSENVOEGSELS||';'||VOORLETTERS||';'||VOORNAAM||';'||AFDELINGSCODE||';'||FUNCTIE||';'||INDIENSTDATUM||';'||UITDIENSTDATUM||';'||DIENSTVERBANDCODE||';'||DIENSTVERBANDGEBOUW||';'||AFDELINGSDOMEIN||';'||TELEFOON||';'||EMAIL||';'||LOGINNAAM||CHR(13)||CHR(10) FROM VW_FC_MEDEWERKERS";
oRs = Oracle.Execute(sql);
var fso;
var flog;
fso = new ActiveXObject("Scripting.FileSystemObject");
flog = fso.CreateTextFile(csvfilename, true);
//Header
flog.Write('PERSONEELSNUMMER;NAAM;TUSSENVOEGSEL;VOORLETTERS;VOORNAAM;AFDELINGSCODE;FUNCTIE;INDIENSTDATUM;UITDIENSTDATUM;DIENSTVERBANDCODE;DIENSTVERBANDGEBOUW;AFDELINGSDOMEIN;TELEFOON;EMAIL;LOGINNAAM\r\n');
//Content
while (!oRs.eof)
{
flog.Write(oRs(0).value);
oRs.MoveNext;
}
oRs.close;
flog.Close();
WScript.Echo("Klaar met wegschrijven CSV: " + (((new Date())-ttTot)) + "ms");

View File

@@ -1,8 +0,0 @@
Echo Starten ImportBeaufort.js
cscript ImportBeaufort.js>>gen_import.log
if errorlevel 1 goto fout
cscript ..\..\..\utils\gen_import\gen_import.wsf DENB PRS >>genimport.log 2>>&1
goto einde
:fout
Echo gen_import.wsf niet meer uitgevoerd>>gen_import.log
:einde