AppStd/TaskFlow
8
1
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

jj

Browse Source
This commit is contained in:
Jonathan Jenne 2020-04-22 15:14:15 +02:00
parent 44a0b16db1
commit 4941572a85
2 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
app/DD_PM_WINDREAM/frmMain.vb
View File

@ -922,10 +922,10 @@ Public Class frmMain
Try Try
frmValidator.Show() frmValidator.Show()
Catch ex As Exception Catch ex As Exception
LOGGER.Warn($"Error opening Form frmValidator [{ex.Message}]") LOGGER.Warn($"Error opening Form frmValidator [{ex.Message}]")
LOGGER.Warn($"ex.InnerException.Message [{ex.InnerException.Message}]") LOGGER.Warn($"ex.InnerException.Message [{ex.InnerException.Message}]")
LOGGER.Warn($"ex.InnerException.Source [{ex.InnerException.Source}]") LOGGER.Warn($"ex.InnerException.Source [{ex.InnerException.Source}]")
LOGGER.Error(ex.InnerException)
MsgBox(ex.Message, MsgBoxStyle.Critical, ADDITIONAL_TITLE) MsgBox(ex.Message, MsgBoxStyle.Critical, ADDITIONAL_TITLE)
End Try End Try

8
app/DD_PM_WINDREAM/frmValidator.vb
View File

@ -18,6 +18,8 @@ Public Class frmValidator
Dim PROFIL_FINISH_SQL Dim PROFIL_FINISH_SQL
Dim PROFIL_LOGINDEX Dim PROFIL_LOGINDEX
Dim oErrorMessage
Private PMDelimiter As String Private PMDelimiter As String
Dim WD_Search As String Dim WD_Search As String
@ -41,7 +43,6 @@ Public Class frmValidator
'Anzahl der validierten Dokumente 'Anzahl der validierten Dokumente
Dim Anzahl_validierte_Dok As Integer = 0 Dim Anzahl_validierte_Dok As Integer = 0
Dim me_closing As Boolean = False Dim me_closing As Boolean = False
Dim oErrorMessage As String = ClassAllgemeineFunktionen.GUI_LANGUAGE_INFO("frmValidator.MissingInput")
Dim first_control As Control Dim first_control As Control
Dim last_control As Control Dim last_control As Control
Dim _Indexe_Loaded As Boolean = False Dim _Indexe_Loaded As Boolean = False
@ -246,6 +247,9 @@ Public Class frmValidator
End If End If
End If End If
oErrorMessage = ClassAllgemeineFunktionen.GUI_LANGUAGE_INFO("frmValidator.MissingInput")
LOGGER.Debug("frmValidation_Load finished!") LOGGER.Debug("frmValidation_Load finished!")
Catch ex As Exception Catch ex As Exception
LOGGER.Error(ex) LOGGER.Error(ex)
@ -4611,7 +4615,7 @@ Public Class frmValidator
Public Const SW_SHOW As Short = 5 Public Const SW_SHOW As Short = 5
Public Sub New() Public Sub New()
MyBase.New 'MyBase.New
LOGGER.Debug("Initialize Components...") LOGGER.Debug("Initialize Components...")
InitializeComponent() InitializeComponent()
LOGGER.Debug("Initialize _frmValidatorSearch...") LOGGER.Debug("Initialize _frmValidatorSearch...")