diff --git a/Bancos/RepProgramarRecursos.aspx.vb b/Bancos/RepProgramarRecursos.aspx.vb
index f0720faa8..07f3fd648 100644
--- a/Bancos/RepProgramarRecursos.aspx.vb
+++ b/Bancos/RepProgramarRecursos.aspx.vb
@@ -170,7 +170,7 @@ Partial Class Bancos_RepProgramarRecursos
                 DdlSubProyecto.DataSource = If(UsuarioActual.Empresa.Funcionalidad(102) = "1" AndAlso Not UsuarioActual.TienePermisoProceso(110), GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1), GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, 1))
                 DdlSubProyecto.DataBind()
                 ' DdlEstatusCompra.SelectedValue = "2" 'las programadas
-                DdlAgrupador.SelectedValue = "2"
+                'DdlAgrupador.SelectedValue = "2"
                 'Gv.Columns(8).Visible = True
                 DdlSubProyecto.Items.Insert(1, New ListItem("Sin Proyecto", "-2"))