From 099f939deb7bcfddf3adb7a3b73c9d28d43ef425 Mon Sep 17 00:00:00 2001 From: rrene Date: Tue, 15 Dec 2020 16:55:44 -0700 Subject: [PATCH] orden de carga de almacenes, cuando son devoluciones --- Inventarios/RecepcionAlmacen.aspx.vb | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Inventarios/RecepcionAlmacen.aspx.vb b/Inventarios/RecepcionAlmacen.aspx.vb index 579a324c4..77f6bb598 100644 --- a/Inventarios/RecepcionAlmacen.aspx.vb +++ b/Inventarios/RecepcionAlmacen.aspx.vb @@ -938,12 +938,12 @@ Partial Class Inventarios_RecepcionAlmacen TotalCompraOC = ObjCompras.DtResultados.Rows(0)("SubTotal").ToString.ToDecimal - ObjCompras.DtResultados.Rows(0)("Descuentos").ToString.ToDecimal CveTipoCompra = ObjCompras.DtResultados.Rows(0)("CveTipoCompra").ToString.ToEntero - If TipoMovimiento = 3 Then - CargaAlmacenes(-1, "21,2", CveTipoCompra) - ElseIf CveTipoCompra = 9 Then + If CveTipoCompra = 9 Then CargaAlmacenes(-1, "27", CveTipoCompra) ElseIf CveTipoCompra = 10 Then CargaAlmacenes(-1, CveTipoCompra:=CveTipoCompra) + ElseIf TipoMovimiento = 3 Then + CargaAlmacenes(-1, "21,2", CveTipoCompra) Else CargaAlmacenes(-1) End If