diff --git a/EDKB04New/App.config b/EDKB04New/App.config
new file mode 100644
index 0000000..193aecc
--- /dev/null
+++ b/EDKB04New/App.config
@@ -0,0 +1,6 @@
+
+
+
+
+
+
\ No newline at end of file
diff --git a/EDKB04New/EDKB04New.vbproj b/EDKB04New/EDKB04New.vbproj
new file mode 100644
index 0000000..f44315c
--- /dev/null
+++ b/EDKB04New/EDKB04New.vbproj
@@ -0,0 +1,116 @@
+
+
+
+
+ Debug
+ AnyCPU
+ {D1C6877A-21F6-41A6-8663-E04DEC337CCB}
+ WinExe
+ EDKB04New.Service1
+ EDKB04New
+ EDKB04New
+ 512
+ Console
+ v4.8
+ true
+ true
+
+
+ AnyCPU
+ true
+ full
+ true
+ true
+ bin\Debug\
+ EDKB04New.xml
+ 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
+
+
+ AnyCPU
+ pdbonly
+ false
+ true
+ true
+ bin\Release\
+ EDKB04New.xml
+ 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
+
+
+ On
+
+
+ Binary
+
+
+ Off
+
+
+ On
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ True
+ Application.myapp
+
+
+ Component
+
+
+ Service1.vb
+
+
+
+ True
+ True
+ Resources.resx
+
+
+ True
+ Settings.settings
+ True
+
+
+
+
+ VbMyResourcesResXFileCodeGenerator
+ Resources.Designer.vb
+ My.Resources
+ Designer
+
+
+
+
+ MyApplicationCodeGenerator
+ Application.Designer.vb
+
+
+ SettingsSingleFileGenerator
+ My
+ Settings.Designer.vb
+
+
+
+
+
\ No newline at end of file
diff --git a/EDKB04New/My Project/Application.Designer.vb b/EDKB04New/My Project/Application.Designer.vb
new file mode 100644
index 0000000..88dd01c
--- /dev/null
+++ b/EDKB04New/My Project/Application.Designer.vb
@@ -0,0 +1,13 @@
+'------------------------------------------------------------------------------
+'
+' This code was generated by a tool.
+' Runtime Version:4.0.30319.42000
+'
+' Changes to this file may cause incorrect behavior and will be lost if
+' the code is regenerated.
+'
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
diff --git a/EDKB04New/My Project/Application.myapp b/EDKB04New/My Project/Application.myapp
new file mode 100644
index 0000000..602de37
--- /dev/null
+++ b/EDKB04New/My Project/Application.myapp
@@ -0,0 +1,10 @@
+
+
+ false
+ false
+ 0
+ true
+ 0
+ 3
+ true
+
diff --git a/EDKB04New/My Project/AssemblyInfo.vb b/EDKB04New/My Project/AssemblyInfo.vb
new file mode 100644
index 0000000..231207b
--- /dev/null
+++ b/EDKB04New/My Project/AssemblyInfo.vb
@@ -0,0 +1,35 @@
+Imports System
+Imports System.Reflection
+Imports System.Runtime.InteropServices
+
+' Allgemeine Informationen über eine Assembly werden über die folgenden
+' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
+' die einer Assembly zugeordnet sind.
+
+' Werte der Assemblyattribute überprüfen
+
+
+
+
+
+
+
+
+
+
+'Die folgende GUID wird für die typelib-ID verwendet, wenn dieses Projekt für COM verfügbar gemacht wird.
+
+
+' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
+'
+' Hauptversion
+' Nebenversion
+' Buildnummer
+' Revision
+'
+' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
+' indem Sie "*" wie unten gezeigt eingeben:
+'
+
+
+
diff --git a/EDKB04New/My Project/Resources.Designer.vb b/EDKB04New/My Project/Resources.Designer.vb
new file mode 100644
index 0000000..816e344
--- /dev/null
+++ b/EDKB04New/My Project/Resources.Designer.vb
@@ -0,0 +1,62 @@
+'------------------------------------------------------------------------------
+'
+' This code was generated by a tool.
+' Runtime Version:4.0.30319.42000
+'
+' Changes to this file may cause incorrect behavior and will be lost if
+' the code is regenerated.
+'
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Namespace My.Resources
+
+ 'This class was auto-generated by the StronglyTypedResourceBuilder
+ 'class via a tool like ResGen or Visual Studio.
+ 'To add or remove a member, edit your .ResX file then rerun ResGen
+ 'with the /str option, or rebuild your VS project.
+ '''
+ ''' A strongly-typed resource class, for looking up localized strings, etc.
+ '''
+ _
+ Friend Module Resources
+
+ Private resourceMan As Global.System.Resources.ResourceManager
+
+ Private resourceCulture As Global.System.Globalization.CultureInfo
+
+ '''
+ ''' Returns the cached ResourceManager instance used by this class.
+ '''
+ _
+ Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
+ Get
+ If Object.ReferenceEquals(resourceMan, Nothing) Then
+ Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("EDKB04New.Resources", GetType(Resources).Assembly)
+ resourceMan = temp
+ End If
+ Return resourceMan
+ End Get
+ End Property
+
+ '''
+ ''' Overrides the current thread's CurrentUICulture property for all
+ ''' resource lookups using this strongly typed resource class.
+ '''
+ _
+ Friend Property Culture() As Global.System.Globalization.CultureInfo
+ Get
+ Return resourceCulture
+ End Get
+ Set(ByVal value As Global.System.Globalization.CultureInfo)
+ resourceCulture = value
+ End Set
+ End Property
+ End Module
+End Namespace
diff --git a/EDKB04New/My Project/Resources.resx b/EDKB04New/My Project/Resources.resx
new file mode 100644
index 0000000..af7dbeb
--- /dev/null
+++ b/EDKB04New/My Project/Resources.resx
@@ -0,0 +1,117 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ text/microsoft-resx
+
+
+ 2.0
+
+
+ System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
+
+
+ System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
+
+
\ No newline at end of file
diff --git a/EDKB04New/My Project/Settings.Designer.vb b/EDKB04New/My Project/Settings.Designer.vb
new file mode 100644
index 0000000..0ee736d
--- /dev/null
+++ b/EDKB04New/My Project/Settings.Designer.vb
@@ -0,0 +1,73 @@
+'------------------------------------------------------------------------------
+'
+' This code was generated by a tool.
+' Runtime Version:4.0.30319.42000
+'
+' Changes to this file may cause incorrect behavior and will be lost if
+' the code is regenerated.
+'
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Namespace My
+
+ _
+ Partial Friend NotInheritable Class MySettings
+ Inherits Global.System.Configuration.ApplicationSettingsBase
+
+ Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings), MySettings)
+
+#Region "My.Settings Auto-Save Functionality"
+#If _MyType = "WindowsForms" Then
+ Private Shared addedHandler As Boolean
+
+ Private Shared addedHandlerLockObject As New Object
+
+ _
+ Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
+ If My.Application.SaveMySettingsOnExit Then
+ My.Settings.Save()
+ End If
+ End Sub
+#End If
+#End Region
+
+ Public Shared ReadOnly Property [Default]() As MySettings
+ Get
+
+#If _MyType = "WindowsForms" Then
+ If Not addedHandler Then
+ SyncLock addedHandlerLockObject
+ If Not addedHandler Then
+ AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
+ addedHandler = True
+ End If
+ End SyncLock
+ End If
+#End If
+ Return defaultInstance
+ End Get
+ End Property
+ End Class
+End Namespace
+
+Namespace My
+
+ _
+ Friend Module MySettingsProperty
+
+ _
+ Friend ReadOnly Property Settings() As Global.EDKB04New.My.MySettings
+ Get
+ Return Global.EDKB04New.My.MySettings.Default
+ End Get
+ End Property
+ End Module
+End Namespace
diff --git a/EDKB04New/My Project/Settings.settings b/EDKB04New/My Project/Settings.settings
new file mode 100644
index 0000000..85b890b
--- /dev/null
+++ b/EDKB04New/My Project/Settings.settings
@@ -0,0 +1,7 @@
+
+
+
+
+
+
+
diff --git a/EDKB04New/Service1.Designer.vb b/EDKB04New/Service1.Designer.vb
new file mode 100644
index 0000000..1ca347f
--- /dev/null
+++ b/EDKB04New/Service1.Designer.vb
@@ -0,0 +1,48 @@
+Imports System.ServiceProcess
+
+ _
+Partial Class Service1
+ Inherits System.ServiceProcess.ServiceBase
+
+ 'UserService überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+ _
+ Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+ Try
+ If disposing AndAlso components IsNot Nothing Then
+ components.Dispose()
+ End If
+ Finally
+ MyBase.Dispose(disposing)
+ End Try
+ End Sub
+
+ ' Der Haupteinstiegspunkt für den Prozess
+ _
+ _
+ Shared Sub Main()
+ Dim ServicesToRun() As System.ServiceProcess.ServiceBase
+
+ ' Innerhalb eines Prozesses können mehrere NT-Dienste ausgeführt werden. Um einen
+ ' weiteren Dienst zu diesem Prozess hinzuzufügen, ändern Sie die folgende Zeile,
+ ' um ein zweites Dienstobjekt zu erstellen. Zum Beispiel
+ '
+ ' ServicesToRun = New System.ServiceProcess.ServiceBase () {New Service1, New MySecondUserService}
+ '
+ ServicesToRun = New System.ServiceProcess.ServiceBase() {New Service1}
+
+ System.ServiceProcess.ServiceBase.Run(ServicesToRun)
+ End Sub
+
+ 'Wird vom Komponenten-Designer benötigt.
+ Private components As System.ComponentModel.IContainer
+
+ ' Hinweis: Die folgende Prozedur ist für den Komponenten-Designer erforderlich.
+ ' Das Bearbeiten ist mit dem Komponenten-Designer möglich.
+ ' Das Bearbeiten mit dem Code-Editor ist nicht möglich.
+ _
+ Private Sub InitializeComponent()
+ components = New System.ComponentModel.Container()
+ Me.ServiceName = "Service1"
+ End Sub
+
+End Class
diff --git a/EDKB04New/Service1.vb b/EDKB04New/Service1.vb
new file mode 100644
index 0000000..4139d95
--- /dev/null
+++ b/EDKB04New/Service1.vb
@@ -0,0 +1,12 @@
+Public Class Service1
+
+ Protected Overrides Sub OnStart(ByVal args() As String)
+ ' Code zum Starten des Dienstes hier einfügen. Diese Methode sollte Vorgänge
+ ' ausführen, damit der Dienst gestartet werden kann.
+ End Sub
+
+ Protected Overrides Sub OnStop()
+ ' Hier Code zum Ausführen erforderlicher Löschvorgänge zum Beenden des Dienstes einfügen.
+ End Sub
+
+End Class
diff --git a/EDKB04New/obj/Debug/.NETFramework,Version=v4.8.AssemblyAttributes.vb b/EDKB04New/obj/Debug/.NETFramework,Version=v4.8.AssemblyAttributes.vb
new file mode 100644
index 0000000..e7dcac5
--- /dev/null
+++ b/EDKB04New/obj/Debug/.NETFramework,Version=v4.8.AssemblyAttributes.vb
@@ -0,0 +1,7 @@
+'
+ Option Strict Off
+ Option Explicit On
+
+ Imports System
+ Imports System.Reflection
+
diff --git a/EDKB04New/obj/Debug/EDKB04New.vbproj.AssemblyReference.cache b/EDKB04New/obj/Debug/EDKB04New.vbproj.AssemblyReference.cache
new file mode 100644
index 0000000..45988b1
Binary files /dev/null and b/EDKB04New/obj/Debug/EDKB04New.vbproj.AssemblyReference.cache differ
diff --git a/EDKB04New/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll b/EDKB04New/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll
new file mode 100644
index 0000000..805266f
Binary files /dev/null and b/EDKB04New/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll differ
diff --git a/EDKB04New/obj/Release/.NETFramework,Version=v4.8.AssemblyAttributes.vb b/EDKB04New/obj/Release/.NETFramework,Version=v4.8.AssemblyAttributes.vb
new file mode 100644
index 0000000..e7dcac5
--- /dev/null
+++ b/EDKB04New/obj/Release/.NETFramework,Version=v4.8.AssemblyAttributes.vb
@@ -0,0 +1,7 @@
+'
+ Option Strict Off
+ Option Explicit On
+
+ Imports System
+ Imports System.Reflection
+
diff --git a/EDKB04New/obj/Release/DesignTimeResolveAssemblyReferencesInput.cache b/EDKB04New/obj/Release/DesignTimeResolveAssemblyReferencesInput.cache
new file mode 100644
index 0000000..d4c1f98
Binary files /dev/null and b/EDKB04New/obj/Release/DesignTimeResolveAssemblyReferencesInput.cache differ
diff --git a/EDKB04New/obj/Release/EDKB04New.vbproj.AssemblyReference.cache b/EDKB04New/obj/Release/EDKB04New.vbproj.AssemblyReference.cache
new file mode 100644
index 0000000..45988b1
Binary files /dev/null and b/EDKB04New/obj/Release/EDKB04New.vbproj.AssemblyReference.cache differ
diff --git a/EDKB04New/obj/Release/TempPE/My Project.Resources.Designer.vb.dll b/EDKB04New/obj/Release/TempPE/My Project.Resources.Designer.vb.dll
new file mode 100644
index 0000000..dde9ea9
Binary files /dev/null and b/EDKB04New/obj/Release/TempPE/My Project.Resources.Designer.vb.dll differ
diff --git a/EDKB04OP.sln b/EDKB04OP.sln
index 2d60e0c..d10b428 100644
--- a/EDKB04OP.sln
+++ b/EDKB04OP.sln
@@ -1,20 +1,13 @@

Microsoft Visual Studio Solution File, Format Version 12.00
-# Visual Studio 2013
-VisualStudioVersion = 12.0.30501.0
+# Visual Studio Version 17
+VisualStudioVersion = 17.10.35728.63
MinimumVisualStudioVersion = 10.0.40219.1
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "EDKB04OP", "EDKB04OP\EDKB04OP.vbproj", "{4D4E0D27-5773-452F-BA0B-7A18EC833470}"
EndProject
+Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "EDKB04New", "EDKB04New\EDKB04New.vbproj", "{D1C6877A-21F6-41A6-8663-E04DEC337CCB}"
+EndProject
Global
- GlobalSection(TeamFoundationVersionControl) = preSolution
- SccNumberOfProjects = 2
- SccEnterpriseProvider = {4CA58AB2-18FA-4F8D-95D4-32DDF27D184C}
- SccTeamFoundationServer = http://sb001580/tfs/defaultcollection
- SccLocalPath0 = .
- SccProjectUniqueName1 = EDKB04OP\\EDKB04OP.vbproj
- SccProjectName1 = EDKB04OP
- SccLocalPath1 = EDKB04OP
- EndGlobalSection
GlobalSection(SolutionConfigurationPlatforms) = preSolution
Debug|Any CPU = Debug|Any CPU
Release|Any CPU = Release|Any CPU
@@ -24,8 +17,15 @@ Global
{4D4E0D27-5773-452F-BA0B-7A18EC833470}.Debug|Any CPU.Build.0 = Debug|Any CPU
{4D4E0D27-5773-452F-BA0B-7A18EC833470}.Release|Any CPU.ActiveCfg = Release|Any CPU
{4D4E0D27-5773-452F-BA0B-7A18EC833470}.Release|Any CPU.Build.0 = Release|Any CPU
+ {D1C6877A-21F6-41A6-8663-E04DEC337CCB}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+ {D1C6877A-21F6-41A6-8663-E04DEC337CCB}.Debug|Any CPU.Build.0 = Debug|Any CPU
+ {D1C6877A-21F6-41A6-8663-E04DEC337CCB}.Release|Any CPU.ActiveCfg = Release|Any CPU
+ {D1C6877A-21F6-41A6-8663-E04DEC337CCB}.Release|Any CPU.Build.0 = Release|Any CPU
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE
EndGlobalSection
+ GlobalSection(ExtensibilityGlobals) = postSolution
+ SolutionGuid = {471F7F86-B83B-46AE-A41A-D83DA5AD3D7F}
+ EndGlobalSection
EndGlobal
diff --git a/EDKB04OP/EDKB04OP.vb b/EDKB04OP/EDKB04OP.vb
index c4652ee..07e6f50 100644
--- a/EDKB04OP/EDKB04OP.vb
+++ b/EDKB04OP/EDKB04OP.vb
@@ -14,6 +14,7 @@
''--------------------------------------------------------------------------------------------------------------------
Imports System.Timers
Imports IBM.WMQ
+Imports IBM
Imports System.ServiceProcess
Imports System.Runtime.Remoting
Imports System.Runtime.Remoting.Channels
@@ -23,6 +24,8 @@ Imports System.IO
Imports System.Reflection
Imports bms
Imports System.Text.RegularExpressions
+Imports IBM.WMQ.Nmqi
+
Public Class EDKB04OP
Inherits System.ServiceProcess.ServiceBase
@@ -110,7 +113,7 @@ Public Class EDKB04OP
tmrQueuePolling.AutoReset = False
If CInt(Params.TimerInterval) > 0 Then
tmrQueuePolling.Start()
- m_log.Log("EDKB04: tmrQueuePolling.Started")
+ m_log.log("EDKB04: tmrQueuePolling.Started")
Else
tmrQueuePolling.Enabled = False
End If
@@ -159,7 +162,7 @@ Public Class EDKB04OP
writer.WriteLine(xmlstring)
writer.Close()
Catch ex As Exception
- m_log.Log("EDKB04: Error beim Abspeichern der Debug .xml Daten")
+ m_log.log("EDKB04: Error beim Abspeichern der Debug .xml Daten")
result = False
End Try
Return filename
@@ -181,13 +184,16 @@ Public Class EDKB04OP
#Region "Timer"
Public Sub OnTimedEvent(ByVal source As Object, ByVal e As ElapsedEventArgs) Handles tmrQueuePolling.Elapsed
Try
- m_log.Log("EDKB04: OnTimedEvent called", Common.Common.JournalEntryType.Information)
+ m_log.log("EDKB04: OnTimedEvent called", Common.Common.JournalEntryType.Information)
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: Start")
ReadfromMQ()
Catch ex As Exception
- m_log.Log("EDKB04: Exception catched in OnTimedEvent()")
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: Error: " + ex.Message)
+ m_log.log("EDKB04: Exception catched in OnTimedEvent()")
Finally
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: Finally")
tmrQueuePolling.Start()
- m_log.Log("EDKB04: tmrQueuePolling.Started")
+ m_log.log("EDKB04: tmrQueuePolling.Started")
End Try
End Sub
#End Region
@@ -368,7 +374,7 @@ Public Class EDKB04OP
Dim currentDate2 As DateTime = DateTime.Now
Dim elapsedTicks As Long = currentDate2.Ticks - currentDate1.Ticks
Dim elapsedSpan As TimeSpan = New TimeSpan(elapsedTicks)
- m_log.Log(String.Format("EDKB04: elapsedTicks = {0}", elapsedTicks))
+ m_log.log(String.Format("EDKB04: elapsedTicks = {0}", elapsedTicks))
End If
End If
Next
@@ -376,8 +382,9 @@ Public Class EDKB04OP
Private Function ReadfromMQ() As Boolean
-
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: Globals")
Globals.archiveFilename = ""
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: Dim")
Dim mqQMgr As MQQueueManager '* MQQueueManager instance
Dim mqQueue As MQQueue = Nothing '* MQQueue instance
Dim queueName As String '* Name of queue to use
@@ -386,25 +393,34 @@ Public Class EDKB04OP
'tmrQueuePolling.Stop()
'm_log.Log("EDKB04: Start MQ Verbindungsaufbau", Common.Common.JournalEntryType.Information)
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: QueueName:" + Params.MQQueueName)
queueName = Params.MQQueueName
Try
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: MQEnv: Hostname" + Params.MQHostname)
MQEnvironment.Hostname = Params.MQHostname 'Bsp: "vb0049d"
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: MQEnv: Port" + Params.MQPort)
MQEnvironment.Port = Params.MQPort 'Bsp: 1416
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: MQEnv: Channel" + Params.MQChannel)
MQEnvironment.Channel = Params.MQChannel 'Bsp: "TGKB.D16.EDOKA.CL"
Try
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: New MQQueueManager")
mqQMgr = New MQQueueManager()
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: AccessQueue")
mqQueue = mqQMgr.AccessQueue(queueName, MQC.MQOO_INPUT_AS_Q_DEF + MQC.MQOO_FAIL_IF_QUIESCING) '* open queue for input but not if MQM stopping
Catch ex As Exception
- m_log.Log("EDKB04: MQ Error: " & ex.Message, Common.Common.JournalEntryType.Error)
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: Error: " + ex.Message)
+ m_log.log("EDKB04: MQ Error: " & ex.Message, Common.Common.JournalEntryType.Error)
End Try
Catch mqe As IBM.WMQ.MQException
- m_log.Log("EDKB04: Error: " & mqe.Message, Common.Common.JournalEntryType.Error)
- m_log.Log("EDKB04: Errorcode: " & mqe.CompletionCode, Common.Common.JournalEntryType.Error)
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: MQExeption: " + mqe.Message)
+ m_log.log("EDKB04: Error: " & mqe.Message, Common.Common.JournalEntryType.Error)
+ m_log.log("EDKB04: Errorcode: " & mqe.CompletionCode, Common.Common.JournalEntryType.Error)
m_log.Log("EDKB04: Reasoncode: " & mqe.ReasonCode, Common.Common.JournalEntryType.Error)
End Try
Try
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: Verarbeitung")
Dim isContinue As Boolean = True
Dim strXMLContent As String
Do While (isContinue = True)
@@ -426,6 +442,7 @@ Public Class EDKB04OP
mqGetMsgOpts.Options = MQC.MQGMO_WAIT
Try
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: GetQueue:")
mqQueue.Get(mqMsg, mqGetMsgOpts)
'mqQueue.
If (mqMsg.Format.CompareTo(MQC.MQFMT_STRING) = 0) Then
@@ -439,12 +456,16 @@ Public Class EDKB04OP
result = False
End If
Catch mqe As IBM.WMQ.MQException
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: Error GetQueue: " + mqe.Message)
'* report reason, if any
+
If (mqe.Reason = MQC.MQRC_NO_MSG_AVAILABLE) Then
'* special report for normal end
m_log.log("EDKB04: no more messages", Common.Common.JournalEntryType.Information)
isContinue = False
Else
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: Error: myStopper")
+
'* general report for other reasons
If Me.myStopper.insert Then m_log.log("EDKB04: MQQueue::Get ended with {0}: " & mqe.Message, Common.Common.JournalEntryType.Error)
@@ -460,6 +481,7 @@ Public Class EDKB04OP
End If
Loop
Catch ex As Exception
+ File.AppendAllText(appPath + "\debug.log", Environment.NewLine + "ReadFromMQ: Error bei GET: " + ex.Message)
If Me.myStopper.insert Then m_log.log("EDKB04: Error bei GET: " & ex.Message, Common.Common.JournalEntryType.Error)
result = False
Finally
diff --git a/EDKB04OP/EDKB04OP.vbproj b/EDKB04OP/EDKB04OP.vbproj
index 96b5c9d..6a92b0d 100644
--- a/EDKB04OP/EDKB04OP.vbproj
+++ b/EDKB04OP/EDKB04OP.vbproj
@@ -11,7 +11,7 @@
EDKB04
512
Console
- v2.0
+ v4.8
SAK
SAK
SAK
@@ -42,6 +42,7 @@
bin\Debug\
EDKB04.xml
42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
+ false
AnyCPU
@@ -52,6 +53,7 @@
bin\Release\
EDKB04.xml
42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
+ false
On
@@ -66,7 +68,8 @@
On
-
+
+ False
dlls\amqmdnet.dll
@@ -112,6 +115,7 @@
True
Application.myapp
+ True
Component
@@ -189,7 +193,6 @@
PreserveNewest
-
diff --git a/EDKB04OP/My Project/Application.Designer.vb b/EDKB04OP/My Project/Application.Designer.vb
index 8d60a96..8ab460b 100644
--- a/EDKB04OP/My Project/Application.Designer.vb
+++ b/EDKB04OP/My Project/Application.Designer.vb
@@ -1,7 +1,7 @@
'------------------------------------------------------------------------------
'
' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.34014
+' Laufzeitversion:4.0.30319.42000
'
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
diff --git a/EDKB04OP/My Project/Resources.Designer.vb b/EDKB04OP/My Project/Resources.Designer.vb
index 8107dfc..7e3b6c3 100644
--- a/EDKB04OP/My Project/Resources.Designer.vb
+++ b/EDKB04OP/My Project/Resources.Designer.vb
@@ -1,7 +1,7 @@
'------------------------------------------------------------------------------
'
' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.34014
+' Laufzeitversion:4.0.30319.42000
'
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
@@ -22,7 +22,7 @@ Namespace My.Resources
'''
''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
'''
- _
diff --git a/EDKB04OP/My Project/Settings.Designer.vb b/EDKB04OP/My Project/Settings.Designer.vb
index 41cfc3b..d5cd2c1 100644
--- a/EDKB04OP/My Project/Settings.Designer.vb
+++ b/EDKB04OP/My Project/Settings.Designer.vb
@@ -1,7 +1,7 @@
'------------------------------------------------------------------------------
'
' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.34014
+' Laufzeitversion:4.0.30319.42000
'
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
@@ -15,21 +15,21 @@ Option Explicit On
Namespace My
_
Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
-#Region "Funktion zum automatischen Speichern von My.Settings"
+#Region "Automatische My.Settings-Speicherfunktion"
#If _MyType = "WindowsForms" Then
Private Shared addedHandler As Boolean
Private Shared addedHandlerLockObject As New Object
_
- Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
+ Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
If My.Application.SaveMySettingsOnExit Then
My.Settings.Save()
End If
diff --git a/EDKB04OP/app.config b/EDKB04OP/app.config
index 808e2f7..aca9b2f 100644
--- a/EDKB04OP/app.config
+++ b/EDKB04OP/app.config
@@ -20,4 +20,4 @@
-
+
diff --git a/EDKB04OP/bin/Debug/EDKB04.exe b/EDKB04OP/bin/Debug/EDKB04.exe
index 0217993..35e122f 100644
Binary files a/EDKB04OP/bin/Debug/EDKB04.exe and b/EDKB04OP/bin/Debug/EDKB04.exe differ
diff --git a/EDKB04OP/bin/Debug/EDKB04.exe.config b/EDKB04OP/bin/Debug/EDKB04.exe.config
index 808e2f7..aca9b2f 100644
--- a/EDKB04OP/bin/Debug/EDKB04.exe.config
+++ b/EDKB04OP/bin/Debug/EDKB04.exe.config
@@ -20,4 +20,4 @@
-
+
diff --git a/EDKB04OP/bin/Debug/EDKB04.pdb b/EDKB04OP/bin/Debug/EDKB04.pdb
index 150018a..df70e8c 100644
Binary files a/EDKB04OP/bin/Debug/EDKB04.pdb and b/EDKB04OP/bin/Debug/EDKB04.pdb differ
diff --git a/EDKB04OP/bin/Debug/amqmdnet.dll b/EDKB04OP/bin/Debug/amqmdnet.dll
index 97cebeb..011cae0 100644
Binary files a/EDKB04OP/bin/Debug/amqmdnet.dll and b/EDKB04OP/bin/Debug/amqmdnet.dll differ
diff --git a/EDKB04OP/bin/Debug/amqmdnetstd.dll b/EDKB04OP/bin/Debug/amqmdnetstd.dll
new file mode 100644
index 0000000..0ddcc3f
Binary files /dev/null and b/EDKB04OP/bin/Debug/amqmdnetstd.dll differ
diff --git a/EDKB04OP/bin/Debug/debug.log b/EDKB04OP/bin/Debug/debug.log
new file mode 100644
index 0000000..b744b7e
--- /dev/null
+++ b/EDKB04OP/bin/Debug/debug.log
@@ -0,0 +1,2 @@
+
+ReadFromMQ: Start
\ No newline at end of file
diff --git a/EDKB04OP/bin/Debug/parameter.cfg b/EDKB04OP/bin/Debug/parameter.cfg
index 33b92ff..e2661bf 100644
--- a/EDKB04OP/bin/Debug/parameter.cfg
+++ b/EDKB04OP/bin/Debug/parameter.cfg
@@ -6,7 +6,7 @@ SqlTimeOut =500000
CDMUTER =EDKB04
MuterNr =9996
WatchDir =k:\edoka\00_EDK_Files\EDKB04
-TimerIntervall =0
+TimerIntervall =100
Loop =false
Debugmode =true
DebugDir =k:\edoka\00_EDK_Files\EDKB04\Archiv
diff --git a/EDKB04OP/bin/Release/20250826_EDKB04.zip b/EDKB04OP/bin/Release/20250826_EDKB04.zip
new file mode 100644
index 0000000..f1da1ef
Binary files /dev/null and b/EDKB04OP/bin/Release/20250826_EDKB04.zip differ
diff --git a/EDKB04OP/bin/Release/20250827_EDKB04.zip b/EDKB04OP/bin/Release/20250827_EDKB04.zip
new file mode 100644
index 0000000..c649602
Binary files /dev/null and b/EDKB04OP/bin/Release/20250827_EDKB04.zip differ
diff --git a/EDKB04OP/bin/Release/EDKB04.exe b/EDKB04OP/bin/Release/EDKB04.exe
index 0fbacb2..d4bfc6e 100644
Binary files a/EDKB04OP/bin/Release/EDKB04.exe and b/EDKB04OP/bin/Release/EDKB04.exe differ
diff --git a/EDKB04OP/bin/Release/EDKB04.exe.config b/EDKB04OP/bin/Release/EDKB04.exe.config
index 808e2f7..aca9b2f 100644
--- a/EDKB04OP/bin/Release/EDKB04.exe.config
+++ b/EDKB04OP/bin/Release/EDKB04.exe.config
@@ -20,4 +20,4 @@
-
+
diff --git a/EDKB04OP/bin/Release/EDKB04.pdb b/EDKB04OP/bin/Release/EDKB04.pdb
index 4b42bb3..ab2d07a 100644
Binary files a/EDKB04OP/bin/Release/EDKB04.pdb and b/EDKB04OP/bin/Release/EDKB04.pdb differ
diff --git a/EDKB04OP/bin/Release/amqmdnet.dll b/EDKB04OP/bin/Release/amqmdnet.dll
index 97cebeb..011cae0 100644
Binary files a/EDKB04OP/bin/Release/amqmdnet.dll and b/EDKB04OP/bin/Release/amqmdnet.dll differ
diff --git a/EDKB04OP/bin/Release/amqmdnetstd.dll b/EDKB04OP/bin/Release/amqmdnetstd.dll
new file mode 100644
index 0000000..0ddcc3f
Binary files /dev/null and b/EDKB04OP/bin/Release/amqmdnetstd.dll differ
diff --git a/EDKB04OP/bin/Release/edkb04.zip b/EDKB04OP/bin/Release/edkb04.zip
index 53edf26..1e30c83 100644
Binary files a/EDKB04OP/bin/Release/edkb04.zip and b/EDKB04OP/bin/Release/edkb04.zip differ
diff --git a/EDKB04OP/bin/Release/edkb04_20240916.zip b/EDKB04OP/bin/Release/edkb04_20240916.zip
new file mode 100644
index 0000000..53edf26
Binary files /dev/null and b/EDKB04OP/bin/Release/edkb04_20240916.zip differ
diff --git a/EDKB04OP/dlls/amqmdnet.dll b/EDKB04OP/dlls/amqmdnet.dll
index 97cebeb..011cae0 100644
Binary files a/EDKB04OP/dlls/amqmdnet.dll and b/EDKB04OP/dlls/amqmdnet.dll differ
diff --git a/EDKB04OP/dlls/amqmdnetstd.dll b/EDKB04OP/dlls/amqmdnetstd.dll
new file mode 100644
index 0000000..0ddcc3f
Binary files /dev/null and b/EDKB04OP/dlls/amqmdnetstd.dll differ
diff --git a/EDKB04OP/obj/Debug/.NETFramework,Version=v4.6.AssemblyAttributes.vb b/EDKB04OP/obj/Debug/.NETFramework,Version=v4.6.AssemblyAttributes.vb
new file mode 100644
index 0000000..498dcdd
--- /dev/null
+++ b/EDKB04OP/obj/Debug/.NETFramework,Version=v4.6.AssemblyAttributes.vb
@@ -0,0 +1,7 @@
+'
+ Option Strict Off
+ Option Explicit On
+
+ Imports System
+ Imports System.Reflection
+
diff --git a/EDKB04OP/obj/Debug/.NETFramework,Version=v4.8.AssemblyAttributes.vb b/EDKB04OP/obj/Debug/.NETFramework,Version=v4.8.AssemblyAttributes.vb
new file mode 100644
index 0000000..e7dcac5
--- /dev/null
+++ b/EDKB04OP/obj/Debug/.NETFramework,Version=v4.8.AssemblyAttributes.vb
@@ -0,0 +1,7 @@
+'
+ Option Strict Off
+ Option Explicit On
+
+ Imports System
+ Imports System.Reflection
+
diff --git a/EDKB04OP/obj/Debug/EDKB04.ProjectInstaller.resources b/EDKB04OP/obj/Debug/EDKB04.ProjectInstaller.resources
index 8b1a44e..b7824dc 100644
Binary files a/EDKB04OP/obj/Debug/EDKB04.ProjectInstaller.resources and b/EDKB04OP/obj/Debug/EDKB04.ProjectInstaller.resources differ
diff --git a/EDKB04OP/obj/Debug/EDKB04.Resources.resources b/EDKB04OP/obj/Debug/EDKB04.Resources.resources
index 06c24d0..6c05a97 100644
Binary files a/EDKB04OP/obj/Debug/EDKB04.Resources.resources and b/EDKB04OP/obj/Debug/EDKB04.Resources.resources differ
diff --git a/EDKB04OP/obj/Debug/EDKB04.exe b/EDKB04OP/obj/Debug/EDKB04.exe
index 0217993..35e122f 100644
Binary files a/EDKB04OP/obj/Debug/EDKB04.exe and b/EDKB04OP/obj/Debug/EDKB04.exe differ
diff --git a/EDKB04OP/obj/Debug/EDKB04.pdb b/EDKB04OP/obj/Debug/EDKB04.pdb
index 150018a..df70e8c 100644
Binary files a/EDKB04OP/obj/Debug/EDKB04.pdb and b/EDKB04OP/obj/Debug/EDKB04.pdb differ
diff --git a/EDKB04OP/obj/Debug/EDKB04OP.vbproj.AssemblyReference.cache b/EDKB04OP/obj/Debug/EDKB04OP.vbproj.AssemblyReference.cache
index 3fc8ec7..45f6004 100644
Binary files a/EDKB04OP/obj/Debug/EDKB04OP.vbproj.AssemblyReference.cache and b/EDKB04OP/obj/Debug/EDKB04OP.vbproj.AssemblyReference.cache differ
diff --git a/EDKB04OP/obj/Debug/EDKB04OP.vbproj.CoreCompileInputs.cache b/EDKB04OP/obj/Debug/EDKB04OP.vbproj.CoreCompileInputs.cache
index 7fc1c12..02e8876 100644
--- a/EDKB04OP/obj/Debug/EDKB04OP.vbproj.CoreCompileInputs.cache
+++ b/EDKB04OP/obj/Debug/EDKB04OP.vbproj.CoreCompileInputs.cache
@@ -1 +1 @@
-8e71177d433b87085749bd8b060a3b51284e68e88e453de6e00601b342cdfee0
+c472b761442ecb08cee397b1c4bf85951714e528476ccc67663ce44fe3d6f589
diff --git a/EDKB04OP/obj/Debug/EDKB04OP.vbproj.GenerateResource.cache b/EDKB04OP/obj/Debug/EDKB04OP.vbproj.GenerateResource.cache
index af703f3..3708d67 100644
Binary files a/EDKB04OP/obj/Debug/EDKB04OP.vbproj.GenerateResource.cache and b/EDKB04OP/obj/Debug/EDKB04OP.vbproj.GenerateResource.cache differ
diff --git a/EDKB04OP/obj/Debug/TempPE/My Project.Application.Designer.vb.dll b/EDKB04OP/obj/Debug/TempPE/My Project.Application.Designer.vb.dll
new file mode 100644
index 0000000..a9784dd
Binary files /dev/null and b/EDKB04OP/obj/Debug/TempPE/My Project.Application.Designer.vb.dll differ
diff --git a/EDKB04OP/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll b/EDKB04OP/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll
index 224c5ad..120b283 100644
Binary files a/EDKB04OP/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll and b/EDKB04OP/obj/Debug/TempPE/My Project.Resources.Designer.vb.dll differ
diff --git a/EDKB04OP/obj/Release/.NETFramework,Version=v4.6.AssemblyAttributes.vb b/EDKB04OP/obj/Release/.NETFramework,Version=v4.6.AssemblyAttributes.vb
new file mode 100644
index 0000000..498dcdd
--- /dev/null
+++ b/EDKB04OP/obj/Release/.NETFramework,Version=v4.6.AssemblyAttributes.vb
@@ -0,0 +1,7 @@
+'
+ Option Strict Off
+ Option Explicit On
+
+ Imports System
+ Imports System.Reflection
+
diff --git a/EDKB04OP/obj/Release/.NETFramework,Version=v4.8.AssemblyAttributes.vb b/EDKB04OP/obj/Release/.NETFramework,Version=v4.8.AssemblyAttributes.vb
new file mode 100644
index 0000000..e7dcac5
--- /dev/null
+++ b/EDKB04OP/obj/Release/.NETFramework,Version=v4.8.AssemblyAttributes.vb
@@ -0,0 +1,7 @@
+'
+ Option Strict Off
+ Option Explicit On
+
+ Imports System
+ Imports System.Reflection
+
diff --git a/EDKB04OP/obj/Release/DesignTimeResolveAssemblyReferencesInput.cache b/EDKB04OP/obj/Release/DesignTimeResolveAssemblyReferencesInput.cache
new file mode 100644
index 0000000..03214ed
Binary files /dev/null and b/EDKB04OP/obj/Release/DesignTimeResolveAssemblyReferencesInput.cache differ
diff --git a/EDKB04OP/obj/Release/EDKB04.ProjectInstaller.resources b/EDKB04OP/obj/Release/EDKB04.ProjectInstaller.resources
index 8b1a44e..b7824dc 100644
Binary files a/EDKB04OP/obj/Release/EDKB04.ProjectInstaller.resources and b/EDKB04OP/obj/Release/EDKB04.ProjectInstaller.resources differ
diff --git a/EDKB04OP/obj/Release/EDKB04.Resources.resources b/EDKB04OP/obj/Release/EDKB04.Resources.resources
index 06c24d0..6c05a97 100644
Binary files a/EDKB04OP/obj/Release/EDKB04.Resources.resources and b/EDKB04OP/obj/Release/EDKB04.Resources.resources differ
diff --git a/EDKB04OP/obj/Release/EDKB04.exe b/EDKB04OP/obj/Release/EDKB04.exe
index 0fbacb2..d4bfc6e 100644
Binary files a/EDKB04OP/obj/Release/EDKB04.exe and b/EDKB04OP/obj/Release/EDKB04.exe differ
diff --git a/EDKB04OP/obj/Release/EDKB04.pdb b/EDKB04OP/obj/Release/EDKB04.pdb
index 4b42bb3..ab2d07a 100644
Binary files a/EDKB04OP/obj/Release/EDKB04.pdb and b/EDKB04OP/obj/Release/EDKB04.pdb differ
diff --git a/EDKB04OP/obj/Release/EDKB04OP.vbproj.AssemblyReference.cache b/EDKB04OP/obj/Release/EDKB04OP.vbproj.AssemblyReference.cache
index c412224..78fe9bc 100644
Binary files a/EDKB04OP/obj/Release/EDKB04OP.vbproj.AssemblyReference.cache and b/EDKB04OP/obj/Release/EDKB04OP.vbproj.AssemblyReference.cache differ
diff --git a/EDKB04OP/obj/Release/EDKB04OP.vbproj.CoreCompileInputs.cache b/EDKB04OP/obj/Release/EDKB04OP.vbproj.CoreCompileInputs.cache
index 7fc1c12..df4b2b0 100644
--- a/EDKB04OP/obj/Release/EDKB04OP.vbproj.CoreCompileInputs.cache
+++ b/EDKB04OP/obj/Release/EDKB04OP.vbproj.CoreCompileInputs.cache
@@ -1 +1 @@
-8e71177d433b87085749bd8b060a3b51284e68e88e453de6e00601b342cdfee0
+cc2989dd8cb4421f93d5ac6b2f733bea2e64f8a62d2e9e932fddffce3662fe2a
diff --git a/EDKB04OP/obj/Release/EDKB04OP.vbproj.FileListAbsolute.txt b/EDKB04OP/obj/Release/EDKB04OP.vbproj.FileListAbsolute.txt
index 3bfa8cb..7cb96ab 100644
--- a/EDKB04OP/obj/Release/EDKB04OP.vbproj.FileListAbsolute.txt
+++ b/EDKB04OP/obj/Release/EDKB04OP.vbproj.FileListAbsolute.txt
@@ -1,3 +1,8 @@
+E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\obj\Release\EDKB04OP.vbproj.AssemblyReference.cache
+E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\obj\Release\EDKB04.Resources.resources
+E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\obj\Release\EDKB04.ProjectInstaller.resources
+E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\obj\Release\EDKB04OP.vbproj.GenerateResource.cache
+E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\obj\Release\EDKB04OP.vbproj.CoreCompileInputs.cache
E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\bin\Release\bms_settings.xml
E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\bin\Release\bms_conn.cfg
E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\bin\Release\edokaconn.cfg
@@ -11,11 +16,6 @@ E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\bin\Release\amqmdnet
E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\bin\Release\BMS.dll
E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\bin\Release\Common.dll
E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\bin\Release\DataAccess.dll
-E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\obj\Release\EDKB04OP.vbproj.AssemblyReference.cache
-E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\obj\Release\EDKB04.Resources.resources
-E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\obj\Release\EDKB04.ProjectInstaller.resources
-E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\obj\Release\EDKB04OP.vbproj.GenerateResource.cache
-E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\obj\Release\EDKB04OP.vbproj.CoreCompileInputs.cache
E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\obj\Release\EDKB04OP.vbproj.Up2Date
E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\obj\Release\EDKB04.exe
E:\Software-Projekte\EDOKA\batch\EDKB04OP\EDKB04OP\EDKB04OP\obj\Release\EDKB04.xml
diff --git a/EDKB04OP/obj/Release/EDKB04OP.vbproj.GenerateResource.cache b/EDKB04OP/obj/Release/EDKB04OP.vbproj.GenerateResource.cache
index af703f3..3708d67 100644
Binary files a/EDKB04OP/obj/Release/EDKB04OP.vbproj.GenerateResource.cache and b/EDKB04OP/obj/Release/EDKB04OP.vbproj.GenerateResource.cache differ
diff --git a/EDKB04OP/obj/Release/TempPE/My Project.Application.Designer.vb.dll b/EDKB04OP/obj/Release/TempPE/My Project.Application.Designer.vb.dll
new file mode 100644
index 0000000..18bc46a
Binary files /dev/null and b/EDKB04OP/obj/Release/TempPE/My Project.Application.Designer.vb.dll differ
diff --git a/EDKB04OP/obj/Release/TempPE/My Project.Resources.Designer.vb.dll b/EDKB04OP/obj/Release/TempPE/My Project.Resources.Designer.vb.dll
index 90f02b0..2ee6173 100644
Binary files a/EDKB04OP/obj/Release/TempPE/My Project.Resources.Designer.vb.dll and b/EDKB04OP/obj/Release/TempPE/My Project.Resources.Designer.vb.dll differ
diff --git a/EDKB04OP/xmlHandling.vb b/EDKB04OP/xmlHandling.vb
index 7994c2c..77dd76c 100644
--- a/EDKB04OP/xmlHandling.vb
+++ b/EDKB04OP/xmlHandling.vb
@@ -440,6 +440,10 @@ Public Class xmlHandling
UpdateStringRow("steuerIdentAHV", dbRow, "steuerIdentAHV")
UpdateStringRow("zivilstand", dbRow, "zivilstand")
'ende 20240916
+ '20240917
+ UpdateStringRow("sex", dbRow, "geschlecht")
+ UpdateStringRow("bvg_versichert", dbRow, "bvg_versichert")
+ 'ende 20240917
UpdateIntRow("sectorId", dbRow, "sector_id")
UpdateIntRow("rechtsFormId", dbRow, "legal_form_id")
UpdateIntRow("personRatingId", dbRow, "rate_intl_id")
diff --git a/EDKB04OPError2025-08-25.log b/EDKB04OPError2025-08-25.log
new file mode 100644
index 0000000..c265a08
--- /dev/null
+++ b/EDKB04OPError2025-08-25.log
@@ -0,0 +1,16 @@
+
+
+Date:2025-08-25 15:24:38,101
+Thread:[1]
+Level:ERROR
+Logger:InsertBlazorCode.SyncfusionCodeGeneratorMenuCommand [(null)]
+Message:System.NullReferenceException: Der Objektverweis wurde nicht auf eine Objektinstanz festgelegt.
+ bei InsertBlazorCode.SyncfusionCodeGeneratorMenuCommand.queryStatusMenuCommand_BeforeQueryStatus(Object sender, EventArgs e) in C:\Git\RP\vsext_insertblazorcode\SyncfusionBlazorcodegenerator\SyncfusionCodeGeneratorMenuCommand.cs:Zeile 322.
+
+
+Date:2025-08-25 15:24:39,135
+Thread:[1]
+Level:ERROR
+Logger:InsertBlazorCode.SyncfusionCodeGeneratorMenuCommand [(null)]
+Message:System.NullReferenceException: Der Objektverweis wurde nicht auf eine Objektinstanz festgelegt.
+ bei InsertBlazorCode.SyncfusionCodeGeneratorMenuCommand.queryStatusMenuCommand_BeforeQueryStatus(Object sender, EventArgs e) in C:\Git\RP\vsext_insertblazorcode\SyncfusionBlazorcodegenerator\SyncfusionCodeGeneratorMenuCommand.cs:Zeile 322.
diff --git a/Sonstige DateienError2025-08-26.log b/Sonstige DateienError2025-08-26.log
new file mode 100644
index 0000000..d09147f
--- /dev/null
+++ b/Sonstige DateienError2025-08-26.log
@@ -0,0 +1,10 @@
+
+
+Date:2025-08-26 12:34:26,294
+Thread:[1]
+Level:ERROR
+Logger:InsertBlazorCode.SyncfusionCodeGeneratorMenuCommand [(null)]
+Message:System.ArgumentException: Der Pfad hat ein ungültiges Format.
+ bei System.IO.Path.NormalizePath(String path, Boolean fullCheck, Int32 maxPathLength, Boolean expandShortPaths)
+ bei System.IO.Path.InternalGetDirectoryName(String path)
+ bei InsertBlazorCode.SyncfusionCodeGeneratorMenuCommand.queryStatusMenuCommand_BeforeQueryStatus(Object sender, EventArgs e) in C:\Git\RP\vsext_insertblazorcode\SyncfusionBlazorcodegenerator\SyncfusionCodeGeneratorMenuCommand.cs:Zeile 331.