From 296c09335544921226c601a462800d4cb478cab1 Mon Sep 17 00:00:00 2001 From: rrene Date: Wed, 6 Jul 2022 08:40:46 -0700 Subject: [PATCH] -- no valida alamcen, en getventa, para generaprepoliza --- Inventarios/EntregaAlmacen.aspx.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Inventarios/EntregaAlmacen.aspx.vb b/Inventarios/EntregaAlmacen.aspx.vb index e8df55bcc..be7ba0a55 100644 --- a/Inventarios/EntregaAlmacen.aspx.vb +++ b/Inventarios/EntregaAlmacen.aspx.vb @@ -2992,7 +2992,7 @@ Partial Class Inventarios_EntregaAlmacen If tmpCostos.Rows.Count > 0 Then - If ObjVentas.GetVenta(CveVentaSurtir, UsuarioActual.CveEmpresa) Then + If ObjVentas.GetVenta(CveVentaSurtir, UsuarioActual.CveEmpresa, False) Then Dim Fecha As Date = TxtFecha.Text.ToDate ' If(TipoMovimiento <> 1, TxtFecha.Text.ToDate, ObjVentas.DtResultados(0)("Fecha").ToString().ToDate) Dim CveCliente As Integer = ObjVentas.DtResultados(0)("CveCliente").ToString().ToEntero() Dim ClienteNombre As String = ObjVentas.DtResultados(0)("ClienteNombre").ToString()