Ventas Medicas correcion eliminacion de procedimiento

This commit is contained in:
rakcsle
2023-12-07 09:58:42 -07:00
parent ee59eb1d7d
commit 7c48373056

View File

@@ -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