BIG CLEANUP

Global_Indexer/frmSQLSuggestion.vb

@@ -1,6 +1,5 @@
 Imports Oracle.ManagedDataAccess.Client
 Public Class frmSQLSuggestion
-    Dim isinsert As Boolean = False
     Private Sub btnVorschlag_Click(sender As Object, e As EventArgs) Handles btnVorschlag.Click
         TestSQL(cmbConnection.SelectedValue, SQL_ERGEBNISTextBox.Text)
     End Sub
@@ -105,8 +104,6 @@ Public Class frmSQLSuggestion
                 Me.cmbConnection.SelectedValue = DT.Rows(0).Item("CONNECTION_ID")
                 SQL_ERGEBNISTextBox.Text = DT.Rows(0).Item("SQL_RESULT")
                 SQL_UEBERPRUEFUNGTextBox.Text = DT.Rows(0).Item("SQL_CHECK")
-            Else
-                isinsert = True
             End If
             lblSave.Visible = False
         Catch ex As Exception
@@ -128,7 +125,7 @@ Public Class frmSQLSuggestion
 
     Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
         Try
-            ClassDatabase.Init()
+            'ClassDatabase.Init()
             Dim origresultstring = DATABASE_ECM.GetScalarValue("SELECT SQL_RESULT FROM TBDD_INDEX_MAN WHERE GUID = " & CURRENT_INDEXMAN)
             Dim origcheckstring = DATABASE_ECM.GetScalarValue("SELECT SQL_CHECK FROM TBDD_INDEX_MAN WHERE GUID = " & CURRENT_INDEXMAN)
             Dim origConnection = DATABASE_ECM.GetScalarValue("SELECT CONNECTION_ID FROM TBDD_INDEX_MAN WHERE GUID = " & CURRENT_INDEXMAN)