From dad9db5293e3a081ee8df8fb3e909c92765a6f0f Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Wed, 1 Apr 2020 19:16:29 -0700
Subject: [PATCH] Validar al aplicar devolucion

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

diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 0900f4597..c07c65184 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -22252,7 +22252,13 @@ Partial Class Ventas
             Exit Sub
         End If
 
-        LBAplicaDevolucion.Visible = True
+
+        If VentaSaldoAlmacen < 0 Then
+            LBAplicaDevolucion.Visible = True
+        ElseIf VentaSaldoAlmacen >= 0 Then
+            LBAplicaDevolucion.Visible = False
+        End If
+
         Dim SeEsconde As Boolean = False
 
         If DtDetalle IsNot Nothing AndAlso DtDetalle.Rows.Count > 0 Then