diff --git a/App_Code/ClsVentas.vb b/App_Code/ClsVentas.vb
index a3217200f..5fc67aa40 100644
--- a/App_Code/ClsVentas.vb
+++ b/App_Code/ClsVentas.vb
@@ -6155,10 +6155,11 @@ Public Class ClsVentas
 
         Try
             SqlAdapter.Fill(Data)
+            'SqlAdapter.SelectCommand.ExecuteNonQuery()
             Retorno = True
         Catch Ex1 As SqlException
             If Ex1.Message.Contains("Número: 547;") Then
-                Alert("La Procedimiento no se pudo eliminar porque está siendo usado por un registro.", TipoMensaje.MsgAdvertencia)
+                Alert("El procedimiento no se pudo eliminar porque está siendo usado por un registro.", TipoMensaje.MsgAdvertencia)
             Else
                 OnError("Ocurrió un error al eliminar el Procedimiento.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
             End If