From 03c70147efd3bb71d9287579bea7d87b9234d9c4 Mon Sep 17 00:00:00 2001 From: rrene Date: Wed, 17 Nov 2021 20:41:51 -0700 Subject: [PATCH] cvealamcen virtual --- Inventarios/TraspasoAlmacen.aspx.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Inventarios/TraspasoAlmacen.aspx.vb b/Inventarios/TraspasoAlmacen.aspx.vb index 7c9afd83a..b32a1baa1 100644 --- a/Inventarios/TraspasoAlmacen.aspx.vb +++ b/Inventarios/TraspasoAlmacen.aspx.vb @@ -2150,7 +2150,7 @@ Partial Class Inventarios_TraspasoAlmacen Dim FolioVirtualEntrada As Integer = 0 If RealizarMovimientoVirtual Then - Dim CveAlmacenVirtual As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen:=DdlAlmacenRecepcion.SelectedValue.ToEntero).FiltroPrimeroValor("CveAlmacenVirtual", "").ToEntero() + Dim CveAlmacenVirtual As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen:=CveAlmacenEntrada).FiltroPrimeroValor("CveAlmacenVirtual", "").ToEntero() If CveAlmacenVirtual > 0 Then