From fbc46bf676487259fec1f85ddc327a483ffbf375 Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Tue, 11 Feb 2025 18:48:49 -0700 Subject: [PATCH] --FIX surtido E199 --- Ventas/Ventas.aspx.vb | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb index 314e5dcb4..1c9847116 100644 --- a/Ventas/Ventas.aspx.vb +++ b/Ventas/Ventas.aspx.vb @@ -10910,7 +10910,7 @@ Partial Class Ventas End If 'SI NO VIENE DE REMISION, MARCAR COMO SURTIDA - If ErrorList.Count = 0 AndAlso UsuarioActual.CveEmpresa.Contiene(199, 201) AndAlso (RemisionesLista Is Nothing OrElse (RemisionesLista IsNot Nothing AndAlso RemisionesLista.Count = 0)) Then + If ErrorList.Count = 0 AndAlso UsuarioActual.CveEmpresa.Contiene(199, 201) AndAlso ObjFactura.TipoDocto = "Ing" AndAlso (RemisionesLista Is Nothing OrElse (RemisionesLista IsNot Nothing AndAlso RemisionesLista.Count = 0)) Then 'MARCAR VENTA ANTERIOR If Not ObjInventario.ActualizarEsDevolucionVenta(ObjFactura.CveVenta, 2) Then ErrorList.Add("No se pudo Cancelar el movimiento de almacen de la Factura") @@ -14770,7 +14770,7 @@ Partial Class Ventas End If 'SI NO VIENE DE REMISION, MARCAR COMO SURTIDA - If ErrorList.Count = 0 AndAlso UsuarioActual.CveEmpresa.Contiene(199, 201) AndAlso (RemisionesLista Is Nothing OrElse (RemisionesLista IsNot Nothing AndAlso RemisionesLista.Count = 0)) Then + If ErrorList.Count = 0 AndAlso UsuarioActual.CveEmpresa.Contiene(199, 201) AndAlso factura.TipoDocto = "Ing" AndAlso (RemisionesLista Is Nothing OrElse (RemisionesLista IsNot Nothing AndAlso RemisionesLista.Count = 0)) Then If Not ObjInventario.UpdateEstatusAlmacen(ObjVentas.CveVentaDetalle, 1) Then ErrorList.Add("No se pudo actualizar el movimiento de almacen de la factura") End If