Update vor Anpassung LSV

EDKB08/EDKB08/bin/gsf/EBES.xml

@@ -0,0 +1,51 @@
+<?xml version="1.0" encoding="utf-8" ?>
+<root>
+	<config>
+		<!-- Name der Anwendung -->
+		<RootName>EBES</RootName>
+
+		<!-- Kein Net Use notwendig.
+		Erlaubte Typen:
+		- 0: Ohne Net Use (Direkte Pfadangabe)
+		- 1: mit Net Use
+		 -->
+		<MitNetUse>0</MitNetUse>
+
+		<!-- Net Use Parameter -->
+		<NetUseParameter>k:\edoka\edkb08\agtguv\input</NetUseParameter>
+
+		<!-- Pfad der Source Dateien 
+		Immer mit \ am Schluss
+		-->
+		<PfadSourceFiles>k:\edoka\edkb08\agtguv\input\</PfadSourceFiles>
+
+		<!-- Anmeldung mit User Notwendig.
+		Erlaubte Typen:
+		- 0: Ohne
+		- 1: mit Anmeldung
+		 -->
+		<NetUseNT>0</NetUseNT>
+
+		<!-- Share Benutzer inkl. Domain -->
+		<NetUseUser>user</NetUseUser>
+		
+		<!-- Share Passwort -->
+		<NetUsePW>password</NetUsePW>
+		
+		<!-- Dateiendung Org SourceFiles -->
+		<DateiEndung_Org_Files>xml</DateiEndung_Org_Files>
+		
+		<!-- Dateiendung OK SourceFiles -->
+		<DateiEndung_OK_Files>xmx</DateiEndung_OK_Files>
+		
+		<!-- Dateiendung Error SourceFiles -->
+		<DateiEndung_Error_Files>xer</DateiEndung_Error_Files>
+
+		<!-- Dateiendung Error SourceFiles -->
+		<DateiEndung_ErrorEDKB08_Files>xee</DateiEndung_ErrorEDKB08_Files>
+
+		<!-- Temppfad fuer neue SourceFiles -->
+		<PfadTempSourceFiles>k:\edoka\EDKB08\tmp_ebes\</PfadTempSourceFiles>
+
+	</config>
+</root>

EDKB08/EDKB08/bin/parameters.cfg

@@ -12,4 +12,5 @@ GSF_Timer in Minuten		=1
 GSF_Conf_Dateiendung		=xml
 Directorytimer			=10
 Directorys				=E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08\bin\DirectoriesToScan.txt
+IndexSicherung			=k:\edoka\edkb08\indsik\
 

EDKB08/EDKB08/edkb08/clsIndexData.vb

@@ -101,7 +101,7 @@ Public Class clsIndexData
                 Catch
                 End Try
                 Try
-                    File.Move(Me.IndexFileName, Params.Inputverzeichnis + "\IndSik\" + Now.ToString("yyyyMMddHHmmss") + "_" + Path.GetFileName(Me.IndexFileName))
+                    File.Move(Me.IndexFileName, Params.sikind + Now.ToString("yyyyMMddHHmmss") + "_" + Path.GetFileName(Me.IndexFileName))
                     'File.Delete(Me.IndexFileName)
                 Catch
                 End Try

EDKB08/EDKB08/edkb08/clsParameter.vb

@@ -189,6 +189,15 @@ Public Class ClsParameters
         End Set
     End Property
 
+    Dim m_sikind As String
+    Property sikind As String
+        Get
+            Return m_sikind
+        End Get
+        Set(value As String)
+            m_sikind = value
+        End Set
+    End Property
 #End Region
 
     '''<summary>Laden der Parameterdaten aus parameters.cfg</summary>
@@ -215,7 +224,7 @@ Public Class ClsParameters
             Me.Prop_gsf_ConfigDateiendung = ParamValue(oread.ReadLine)
             Me.DirectoryTimer_Intervall = ParamValue(oread.ReadLine) * 60 * 1000
             Me.Directoryscanner = ParamValue(oread.ReadLine)
-
+            Me.sikind = ParamValue(oread.ReadLine)
             oread.Close()
             Me.Meldung = "Parameter auslesen i.O."
             Return True

EDKB08/EDKB08/obj/Debug/EDKB08.vbproj.FileListAbsolute.txt

@@ -26,5 +26,4 @@ E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08\obj\Debug\EDKB08.exe
 E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08\obj\Debug\EDKB08.xml
 E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08\obj\Debug\EDKB08.pdb
 E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08\obj\Debug\EDKB08.vbproj.CopyComplete
-E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08\obj\Debug\EDKB08.vbprojAssemblyReference.cache
 E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08\obj\Debug\EDKB08.vbproj.CoreCompileInputs.cache

EDKB08/EDKB08_GSF/obj/Debug/EDKB08_GSF.vbproj.FileListAbsolute.txt

@@ -10,4 +10,5 @@ E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF\bin\EDKB08_GSF.xml
 E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF\obj\Debug\EDKB08_GSF.dll
 E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF\obj\Debug\EDKB08_GSF.xml
 E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF\obj\Debug\EDKB08_GSF.pdb
-E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF\obj\Debug\EDKB08_GSF.vbprojResolveAssemblyReference.cache
+E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF\obj\Debug\EDKB08_GSF.vbprojAssemblyReference.cache
+E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF\obj\Debug\EDKB08_GSF.vbproj.CoreCompileInputs.cache

EDKB08/EDKB08_GSF_Tester/obj/Debug/EDKB08_GSF_Tester.vbproj.FileListAbsolute.txt

@@ -4,7 +4,9 @@ E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF_Tester\bin\EDKB08_GSF_Tester.
 E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF_Tester\bin\EDKB08_GSF.dll
 E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF_Tester\bin\EDKB08_GSF.pdb
 E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF_Tester\bin\EDKB08_GSF.xml
-E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF_Tester\obj\Debug\EDKB08_GSF_Tester.vbprojResolveAssemblyReference.cache
 E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF_Tester\obj\Debug\EDKB08_GSF_Tester.exe
 E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF_Tester\obj\Debug\EDKB08_GSF_Tester.xml
 E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF_Tester\obj\Debug\EDKB08_GSF_Tester.pdb
+E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF_Tester\obj\Debug\EDKB08_GSF_Tester.vbprojAssemblyReference.cache
+E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF_Tester\obj\Debug\EDKB08_GSF_Tester.vbproj.CoreCompileInputs.cache
+E:\Software-Projekte\EDOKA\batch\EDKB08\EDKB08_GSF_Tester\obj\Debug\EDKB08_GSF_Tester.vbproj.CopyComplete