IDB Conform Step1
This commit is contained in:
@@ -190,7 +190,7 @@ Public Class ClassAllgemeineFunktionen
|
||||
LOGGER.Info(" Fehler bei Move2Folder", True)
|
||||
LOGGER.Info(">> Fehlermeldung")
|
||||
LOGGER.Info(">>" & ex.Message)
|
||||
Insert_LogEntry(Profile_ID, "Fehler bei Move2Folder: " & ex.Message, Environment.UserName)
|
||||
Insert_LogEntry(Profile_ID, "Fehler bei Move2Folder: " & ex.Message, USER_USERNAME)
|
||||
Return ex.Message
|
||||
End Try
|
||||
End Function
|
||||
@@ -276,7 +276,7 @@ Public Class ClassAllgemeineFunktionen
|
||||
Catch ex As Exception
|
||||
LOGGER.Error(ex)
|
||||
MsgBox("Unvorhergesehener Fehler bei Execute_Scalar_SQLServer" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei Ausführen sql:")
|
||||
Insert_LogEntry(profil_id, "Unvorhergesehener Fehler bei Execute_Scalar_Oracle: " & ex.Message, Environment.UserName)
|
||||
Insert_LogEntry(profil_id, "Unvorhergesehener Fehler bei Execute_Scalar_Oracle: " & ex.Message, USER_USERNAME)
|
||||
LOGGER.Info(" - Unvorhergesehener Fehler bei Execute_Scalar_SQLServer" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler: " & vbNewLine & ex.Message)
|
||||
LOGGER.Info(" - SQL: " & vsql_statement)
|
||||
LOGGER.Info(" - Connection: " & vconnectionString)
|
||||
@@ -310,7 +310,7 @@ Public Class ClassAllgemeineFunktionen
|
||||
Catch ex As Exception
|
||||
LOGGER.Error(ex)
|
||||
MsgBox("Unvorhergesehener Fehler bei Execute_Scalar_Oracle" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei Ausführen sql:")
|
||||
Insert_LogEntry(profil_id, "Unvorhergesehener Fehler bei Execute_Scalar_Oracle: " & ex.Message, Environment.UserName)
|
||||
Insert_LogEntry(profil_id, "Unvorhergesehener Fehler bei Execute_Scalar_Oracle: " & ex.Message, USER_USERNAME)
|
||||
LOGGER.Info(" - Unvorhergesehener Fehler bei Execute_Scalar_Oracle" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler: " & vbNewLine & ex.Message)
|
||||
LOGGER.Info(" - SQL: " & vsql_statement)
|
||||
LOGGER.Info(" - Connection: " & vconnectionString)
|
||||
|
||||
Reference in New Issue
Block a user