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()