From 7c4837305612b90e83d85b2fc8c7f0835eee5628 Mon Sep 17 00:00:00 2001
From: rakcsle <rakcsle.rakcsle@gmail.com>
Date: Thu, 7 Dec 2023 09:58:42 -0700
Subject: [PATCH] Ventas Medicas correcion eliminacion de procedimiento

---
 App_Code/ClsVentas.vb | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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