diff --git a/Inventarios/RepTraspasoAlmacen.aspx.vb b/Inventarios/RepTraspasoAlmacen.aspx.vb
index 184af8aa9..773324e70 100644
--- a/Inventarios/RepTraspasoAlmacen.aspx.vb
+++ b/Inventarios/RepTraspasoAlmacen.aspx.vb
@@ -122,7 +122,7 @@ Partial Class RepTraspasoAlmacen
         DdlAlmacenOrigen.SelectedValueExist(UsuarioActual.CveAlmacen)
     End Sub
     Private Sub CargaAlmacenDestino()
-        DdlAlmacenDestino.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen NOT IN (3,4,9,10,11,21)")
+        DdlAlmacenDestino.DataSource = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltraParametros("CveTipoAlmacen NOT IN (3,4,9,10,11,21)")
         DdlAlmacenDestino.DataBind()
         DdlAlmacenDestino.Items.Insert(0, New ListItem("Todos", "-1"))
         DdlAlmacenDestino.SelectedValue = "-1"