From d967e82df0d4aac0b8a4025cb1217f670b5031a2 Mon Sep 17 00:00:00 2001 From: Digital Data - Marlon Schreiber Date: Tue, 12 Jun 2018 15:59:03 +0200 Subject: [PATCH] MS: Logging replace --- app/DD_PM_WINDREAM/frmValidator.vb | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/app/DD_PM_WINDREAM/frmValidator.vb b/app/DD_PM_WINDREAM/frmValidator.vb index dbf9d1b..a2d0508 100644 --- a/app/DD_PM_WINDREAM/frmValidator.vb +++ b/app/DD_PM_WINDREAM/frmValidator.vb @@ -421,6 +421,7 @@ Public Class frmValidator Dim connectionId As Integer = row.Item("CONNECTION_ID") sql = DD_LIB_Standards.clsPatterns.ReplaceInternalValues(sqlStatement) + If LogErrorsOnly = False Then ClassLogger.Add(">>> sql after ReplaceInternalValues: " & sql, False) 'sql = ClassPatterns.ReplaceInternalValues(sqlStatement) dt = ClassDatabase.Return_Datatable(sql) @@ -641,7 +642,7 @@ Public Class frmValidator If clsPatterns.HasOnlySimplePatterns(sql) Then sql = clsPatterns.ReplaceInternalValues(sql) sql = clsPatterns.ReplaceControlValues(sql, pnldesigner) - + If LogErrorsOnly = False Then ClassLogger.Add(">>> sql after HasOnlySimplePatterns: " & sql, False) sqlCnn = New SqlClient.SqlConnection(connectionString) ' Try sqlCnn.Open() @@ -814,7 +815,7 @@ Public Class frmValidator sql_Statement = clsPatterns.ReplaceAllValues(sql_Statement, pnldesigner, aktivesDokument, CURRENT_USER_PRENAME, CURRENT_USER_SURNAME, CURRENT_USER_SHORTNAME, CURRENT_USER_EMAIL) - + If LogErrorsOnly = False Then ClassLogger.Add(">>> sql after ReplaceAllValues: " & sql, False) '' Regulären Ausdruck zum Auslesen der Indexe definieren 'Dim preg As String = "\[%{1}[a-zA-Z0-9\!\$\&\/\(\)\=\?\,\.\-\;\:_öÖüÜäÄ\#\'\+\*\~\{\}\@\€\<\>\ ]+]{1}" '' einen Regulären Ausdruck laden @@ -937,6 +938,7 @@ Public Class frmValidator Dim sql_Statement = ROW.Item("SQL_UEBERPRUEFUNG") sql_Statement = clsPatterns.ReplaceAllValues(sql_Statement, pnldesigner, aktivesDokument, CURRENT_USER_PRENAME, CURRENT_USER_SURNAME, CURRENT_USER_SHORTNAME, CURRENT_USER_EMAIL) + If LogErrorsOnly = False Then ClassLogger.Add(">>> sql after ReplaceAllValues: " & sql, False) '' Regulären Ausdruck zum Auslesen der Indexe definieren 'Dim preg As String = "\[%{1}[a-zA-Z0-9\!\$\&\/\(\)\=\?\,\.\-\;\:_öÖüÜäÄ\#\'\+\*\~\{\}\@\€\<\>\ ]+]{1}" '' einen Regulären Ausdruck laden