cambios en objeto a dropdownlost

- subproyectos filtrados por usuario

Compras/RepReqOCCompraInv.aspx.vb

@@ -100,15 +100,15 @@ Partial Class RepReqOCCompraInv
 
 #Region "CARGA COMBOS FILTRO"
     Private Sub CargaSucursal()
-        DdlSucursal.DataSource = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa)
+        DdlSucursal.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa)
         DdlSucursal.DataBind()
         DdlSucursal.Items.Insert(0, New ListItem("Todos", "-1"))
         DdlSucursal.SelectedValue = "-1"
     End Sub
     Private Sub CargaProveedor()
-        DdlProveedor.DataSource = GlobalDTCompProveedores(UsuarioActual.CveEmpresa)
-        DdlProveedor.DataBind()
-        DdlProveedor.Items.Insert(0, New ListItem("Todos", "-1"))
+        DdlProveedor.setEsWebService(True)
+        DdlProveedor.Attributes.Add("data-metodo", "getproveedores")
+        DdlProveedor.SelectedText = "Todos"
         DdlProveedor.SelectedValue = "-1"
     End Sub
 #End Region