From 3126589b132333bb8d39f0a497ba7e56155acaed Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Sat, 24 May 2025 00:46:43 -0700
Subject: [PATCH] --Validacion de solicitud

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

diff --git a/App_Code/ClsVentas.vb b/App_Code/ClsVentas.vb
index 9250bda95..8b83de472 100644
--- a/App_Code/ClsVentas.vb
+++ b/App_Code/ClsVentas.vb
@@ -6096,8 +6096,14 @@ Public Class ClsVentas
         Try
             SqlAdapter.Fill(Data)
             Retorno = True
+        Catch Ex1 As SqlException
+            If Ex1.Message.Contains("vigente") Then
+                Alert("Ya existe una solicitud vigente", TipoMensaje.MsgAdvertencia)
+            Else
+                Me.OnError("Ocurrió un error al guardar la autorización.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+            End If
         Catch ex As Exception
-            OnError("Ocurrió un error al obtener los limites.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+            OnError("Ocurrió un error al guardar la autorización.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
         End Try
         Return Retorno
     End Function