6.12 **infraDBPrepareConnection – Prozessumgebung für
  Connect
lRc = Object.infraDBPrepareConnection(strIniPath, strStation )
Argumente
strIniPath Pfad zu den infra-INI – Dateien, z.B C:\INFRA\GRAFIK\INI
strStation Name der Station, muss pro infra-Datenbank eindeutig sein.
Rückgabewerte
lRc == 0 Kein Fehler
lRc <> 0 infra-Kernsystemfehler
Beschreibung
Damit auf die infra-Datenbank zugegriffen werden kann, ist die Prozessumgebung für das infra-Kernsystem anzugeben.
Dieser Funktion ist der Pfad zu den infra-INI-Dateien, z.B. SIBPPS.INI, mitzugeben.
Im zweiten Parameter wird der Stationsname übergeben.
Hier ist zu berücksichtigen, dass der Stationsname nur einmal vergeben werden darf, ansonsten erhält man den infra-Kernsystemfehler 1027, Benutzer/Sitzung bereits aktiv.
Zur Prozessumgebung gehört auch
- In PATH muss der Modulpfad der Kernsystemdll’s eingetragen werden.
- SIBINIPATH und GWPATH müssen korrekt sein
Die Beispielfunktion CreateEnvironment zeigt, wie die Prozessumgebung dynamisch für das aktuelle Skript erstellt werden kann.
In dieser Funktion wird auch die Logdatei erstellt, die “STATIONSNAME“_IDB.LOG genannt und in das infra-Protollverzeichnis geschrieben wird.
Funktionsart
infraDBFunktion
Basic-Skript
Java-Skript
Beispiel Basic-Skript
Dim strIni
Dim oIDB
Dim lRc
strIni = CreateEnvironment( strinfraPath )
Set oIDB = CreateObject("infra.DBAccess")
lRc = oIDB.infraDBPrepareConnection( strIni, strStation )
WScript.Quit
function CreateEnvironment( strinfraPath )
Dim WShell
Dim WshEnv
Set WShell     = CreateObject("WScript.Shell")
Set WshEnv      = WShell.Environment("Process")
WshEnv("PATH")= WshEnv("PATH") + ";" & strinfraPath &        "\\GRAFIK\\MODUL\\WIN32"
WshEnv("SIBINIPATH")= strinfraPath & "\\GRAFIK\\INI"
WshEnv("GWPATH")= strinfraPath & "\\GRAFIK\\INI\\Win32"
WshEnv("GWPATH")= WshEnv("GWPATH") & ";" + strinfraPath &        "\\GRAFIK\\SCREEN"
WshEnv("GWPATH")= WshEnv("GWPATH") & ";" + strinfraPath &        "\\GRAFIK\\PICTURE\\Win32"
CreateEnvironment = WshEnv("SIBINIPATH")
End function 
Beispiel Java-Skript
Siehe auch Beispiel infraDBConnect
var strErr = new String();
var strIni = CreateEnvironment( strinfraPath )
var oIDB = new ActiveXObject("infra.DBAccess");
var lRc = oIDB.infraDBPrepareConnection( strIni, strStation )
WScript.Quit();
function CreateEnvironment( strinfraPath ){
var WShell     = new ActiveXObject("WScript.Shell");
var WshEnv      = WShell.Environment("Process");
WshEnv("PATH")= WshEnv("PATH") + ";" + strinfraPath +        "\\GRAFIK\\MODUL\\WIN32";
WshEnv("SIBINIPATH")= strinfraPath + "\\GRAFIK\\INI";
WshEnv("GWPATH")= strinfraPath + "\\GRAFIK\\INI\\Win32";
WshEnv("GWPATH")= WshEnv("GWPATH") + ";" + strinfraPath +        "\\GRAFIK\\SCREEN";
WshEnv("GWPATH")= WshEnv("GWPATH") + ";" + strinfraPath +        "\\GRAFIK\\PICTURE\\Win32";
Return WshEnv("SIBINIPATH");}