From 60e4dfd635c58a4ef55d826a928b9fc93389fa23 Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Thu, 20 Jul 2023 20:59:33 -0700
Subject: [PATCH] Correciones en ventas y timbrado

---
 App_Code/Timbrado.vb  | 6 +++---
 Ventas/Ventas.aspx.vb | 2 +-
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/App_Code/Timbrado.vb b/App_Code/Timbrado.vb
index 64cca2945..7162b74a7 100644
--- a/App_Code/Timbrado.vb
+++ b/App_Code/Timbrado.vb
@@ -590,11 +590,11 @@ Public Class Timbrado
                         CancelacionFecha = xmlDoc.SelectSingleNode("Acuse").Attributes("Fecha").Value.ToDate
                         Retorno.CancelacionAcuse = CancelacionAcuse
                         Retorno.CancelacionFecha = CancelacionFecha
-
+                        Retorno.Verificado = True
                     Else
-                        CancelacionFecha = Now
+                        Retorno.Verificado = False
                     End If
-                    Retorno.Verificado = True
+
 
                 Else
                     MsgCancelacion.AppendFormat("-3.5")
diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 9724d8022..9c43d921f 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -24897,7 +24897,7 @@ Partial Class Ventas
                 Exit Sub
             End If
 
-            If SaldoVenta <> 0 Then
+            If SaldoAlmacen <> 0 Then
 
                 If UsuarioActual.TienePermisoProceso(269) Then
                     DivDevAlm.Visible = True