-
+
SubProyecto:
diff --git a/Inventarios/InventarioFisico.aspx.vb b/Inventarios/InventarioFisico.aspx.vb
index 8e9f7a024..3f8632f2d 100644
--- a/Inventarios/InventarioFisico.aspx.vb
+++ b/Inventarios/InventarioFisico.aspx.vb
@@ -88,6 +88,7 @@ Partial Class Inventarios_InventarioFisico
Inventario.Dispose()
gvIF.DataSource = dt
gvIF.EditIndex = -1
+ gvIF.Columns(1).HeaderText = LblSubProyecto.Text
gvIF.DataBind()
gvIF.Columns(6).Visible = UsuarioActual.TienePermisoProceso(178)
End Sub
@@ -125,11 +126,8 @@ Partial Class Inventarios_InventarioFisico
UPPPSExcluye.Update()
End Sub
Private Sub CargaDdlSubProyectos()
- DdlSubProyecto.DataSource = GlobalDTSubProyectos(-1, CveEmpresa:=UsuarioActual.CveEmpresa)
- DdlSubProyecto.DataBind()
- DdlFiltroSubProyecto.Items.Insert(0, New ListItem("Todas", "-1"))
- DdlFiltroSubProyecto.DataSource = GlobalDTSubProyectos(-1, CveEmpresa:=UsuarioActual.CveEmpresa)
- DdlFiltroSubProyecto.DataBind()
+ CargarCentrosDeCosto(Nothing, DdlSubProyecto, Nothing, LblSubProyecto)
+ CargarCentrosDeCosto(Nothing, DdlFiltroSubProyecto, Nothing, LblFiltroSubProyecto)
End Sub
Private Sub CargaDdlClasificacion()
DdlClasificacion.Items.Insert(0, New ListItem("Todos", "-1"))
@@ -552,6 +550,7 @@ Partial Class Inventarios_InventarioFisico
If ObjInventario.GetInventarioFisico(-1, UsuarioActual.CveEmpresa, DdlFiltroSubProyecto.SelectedValue.ToEntero, DdlEstado.SelectedValue) Then
gvIF.DataSource = ObjInventario.DtResultados
gvIF.DataBind()
+ gvIF.Columns(1).HeaderText = LblSubProyecto.Text
End If
UppInventarioFisico.Update()
ObjInventario.Dispose()