ClipboardWatcher: use profile errormessage

This commit is contained in:
Jonathan Jenne 2020-12-15 11:27:24 +01:00
parent 07171c6973
commit f41710d356

View File

@ -19,7 +19,7 @@ Public Class ProfileFilter
Private _LogConfig As LogConfig Private _LogConfig As LogConfig
Private _Logger As Logger Private _Logger As Logger
Enum ImageIndex Public Enum ImageIndex
Root Root
Profile Profile
Clipboard Clipboard
@ -28,6 +28,11 @@ Public Class ProfileFilter
Control Control
End Enum End Enum
Public Const ERROR_LOADING_COUNT_SQL_FOR_DATA_SEARCH = "ERROR_LOADING_COUNT_SQL_FOR_DATA_SEARCH"
Public Const ERROR_LOADING_COUNT_SQL_FOR_DOC_SEARCH = "ERROR_LOADING_COUNT_SQL_FOR_DOC_SEARCH"
Public Const ERROR_EXECUTING_COUNT_SQL_FOR_DATA_SEARCH = "ERROR_EXECUTING_COUNT_SQL_FOR_DATA_SEARCH"
Public Const ERROR_EXECUTING_COUNT_SQL_FOR_DOC_SEARCH = "ERROR_EXECUTING_COUNT_SQL_FOR_DOC_SEARCH"
Public ReadOnly Property Profiles As List(Of ProfileData) Public ReadOnly Property Profiles As List(Of ProfileData)
Get Get
Return _Profiles Return _Profiles
@ -348,6 +353,7 @@ Public Class ProfileFilter
Try Try
oDTDataSearches = Database.GetDatatable($"SELECT COUNT_COMMAND, CONN_ID FROM TBCW_PROF_DATA_SEARCH WHERE ACTIVE = 1 AND PROFILE_ID = {oProfile.Guid}") oDTDataSearches = Database.GetDatatable($"SELECT COUNT_COMMAND, CONN_ID FROM TBCW_PROF_DATA_SEARCH WHERE ACTIVE = 1 AND PROFILE_ID = {oProfile.Guid}")
Catch ex As Exception Catch ex As Exception
oProfile.ErrorMessage = ERROR_LOADING_COUNT_SQL_FOR_DATA_SEARCH
_Logger.Error(ex) _Logger.Error(ex)
Continue For Continue For
End Try End Try
@ -355,6 +361,7 @@ Public Class ProfileFilter
Try Try
oDTDocSearches = Database.GetDatatable($"SELECT COUNT_COMMAND, CONN_ID FROM TBCW_PROF_DOC_SEARCH WHERE ACTIVE = 1 AND PROFILE_ID = {oProfile.Guid}") oDTDocSearches = Database.GetDatatable($"SELECT COUNT_COMMAND, CONN_ID FROM TBCW_PROF_DOC_SEARCH WHERE ACTIVE = 1 AND PROFILE_ID = {oProfile.Guid}")
Catch ex As Exception Catch ex As Exception
oProfile.ErrorMessage = ERROR_LOADING_COUNT_SQL_FOR_DOC_SEARCH
_Logger.Error(ex) _Logger.Error(ex)
Continue For Continue For
End Try End Try
@ -383,6 +390,7 @@ Public Class ProfileFilter
_Logger.Debug("Datarows returned from search: [{0}]", oResultData) _Logger.Debug("Datarows returned from search: [{0}]", oResultData)
Catch ex As Exception Catch ex As Exception
oProfile.ErrorMessage = ERROR_EXECUTING_COUNT_SQL_FOR_DATA_SEARCH
_Logger.Error(ex) _Logger.Error(ex)
_Logger.Warn("Invalid SQL Query for Counting Data in Profile [{0}]: [{1}]", oProfile.Guid, oCountCommand) _Logger.Warn("Invalid SQL Query for Counting Data in Profile [{0}]: [{1}]", oProfile.Guid, oCountCommand)
End Try End Try
@ -412,6 +420,7 @@ Public Class ProfileFilter
_Logger.Debug("Documents returned from search: [{0}]", oResultDocs) _Logger.Debug("Documents returned from search: [{0}]", oResultDocs)
Catch ex As Exception Catch ex As Exception
oProfile.ErrorMessage = ERROR_EXECUTING_COUNT_SQL_FOR_DOC_SEARCH
_Logger.Error(ex) _Logger.Error(ex)
_Logger.Warn("Invalid SQL Query for Counting Data in Profile [{0}]: [{1}]", oProfile.Guid, oCountCommand) _Logger.Warn("Invalid SQL Query for Counting Data in Profile [{0}]: [{1}]", oProfile.Guid, oCountCommand)
End Try End Try