Pusch_27042016

app/DD-Record-Organiser/ClassDatabase.vb

@@ -224,9 +224,6 @@ Public Class ClassDatabase
     Public Shared Function Execute_Scalar(cmdscalar As String, Optional Userinput As Boolean = False)
         Dim result
         Try
-            If cmdscalar = "select RECORD_ENTITY_ID FROM TBPMO_RECORD WHERE GUID = @RECORD_ID" Then
-                MsgBox("Unexpected SQL Error - Details following....", MsgBoxStyle.Exclamation)
-            End If
             Dim SQLconnect As New SqlClient.SqlConnection
             Dim SQLcommand As SqlClient.SqlCommand
             SQLconnect.ConnectionString = connectionString