From d33e91ccc8023de185c1896049270555b6bad842 Mon Sep 17 00:00:00 2001 From: rrene Date: Tue, 3 Nov 2020 13:22:52 -0700 Subject: [PATCH] --cambio de multiplciador de devolucion de mercandia de tipodocto:DEV --- Inventarios/EntregaAlmacen.aspx.vb | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Inventarios/EntregaAlmacen.aspx.vb b/Inventarios/EntregaAlmacen.aspx.vb index 5d01bd939..3856176b0 100644 --- a/Inventarios/EntregaAlmacen.aspx.vb +++ b/Inventarios/EntregaAlmacen.aspx.vb @@ -2850,11 +2850,11 @@ Partial Class Inventarios_EntregaAlmacen Dim ValorMultiplicador = 1 If TipoMovimiento = 1 Then + ValorMultiplicador = 1 + ElseIf TipoMovimiento = 2 AndAlso TipoDocto.Contiene({"Dev"}) AndAlso (EsDevolucionVenta = 1) Then ValorMultiplicador = 1 ElseIf TipoMovimiento = 2 Then - ValorMultiplicador = -1 - ElseIf TipoMovimiento = 2 AndAlso TipoDocto.Contiene({"Dev"}) And (EsDevolucionVenta = 1) Then - ValorMultiplicador = 1 + ValorMultiplicador = -1 End If Dim CvePrePoliza As Integer = ObjConta.AddPrePolizas("Inventario/RecepcionEntrega", 4, TotalCosto, TotalCosto, 1, Fecha, ClienteNombre, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)