diff --git a/Inventarios/RepVentasXSurtir.aspx b/Inventarios/RepVentasXSurtir.aspx
index 4bb6d9db8..0e8c227f9 100644
--- a/Inventarios/RepVentasXSurtir.aspx
+++ b/Inventarios/RepVentasXSurtir.aspx
@@ -28,9 +28,7 @@
diff --git a/Inventarios/RepVentasXSurtir.aspx.vb b/Inventarios/RepVentasXSurtir.aspx.vb
index f1e8ca704..158826a28 100644
--- a/Inventarios/RepVentasXSurtir.aspx.vb
+++ b/Inventarios/RepVentasXSurtir.aspx.vb
@@ -16,9 +16,20 @@ Partial Class Inventarios_RepVentasXSurtir
#Region " INICIALIZA VALORES "
Private Sub InicializaValores()
- DdlPS.DataSource = GlobalDTPSSimplificado(UsuarioActual.CveEmpresa)
- DdlPS.DataBind()
+ 'Carga Productos
+ DdlPS.setEsWebService(UsuarioActual.Empresa.Funcionalidad(105) = "1")
+ If UsuarioActual.Empresa.Funcionalidad(105) = "1" Then
+ DdlPS.SelectedText = "Todos"
+ DdlPS.SelectedValue = "-1"
+ Else
+ DdlPS.ddl.Items.Clear()
+ DdlPS.ddl.DataSource = GlobalDTPSSimplificado(UsuarioActual.CveEmpresa)
+ DdlPS.ddl.DataBind()
+ DdlPS.ddl.Items.Insert(0, New ListItem("Todos", "-1"))
+ End If
+
+ 'Carga Sucursales
DdlSubProyectos.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1)
DdlSubProyectos.DataBind()