correcciones en algunas páginas e implementación del metodo de subproyecto y proyecto

This commit is contained in:
Antonio Gonzalez
2020-07-06 19:54:01 -07:00
parent 4174dbfd56
commit 98f93dff92
17 changed files with 66 additions and 225 deletions

View File

@@ -84,10 +84,8 @@ Partial Class ACumuladores_RepIndicadorDiario
Private Sub CargaCombos()
DdlSubProyecto.DataSource = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa)
DdlSubProyecto.DataBind()
DdlSubProyecto.Items.Insert(0, New ListItem("Todos", "-1"))
DdlSubProyecto.SelectedValuesIfExist("-1")
CargarCentrosDeCosto(Nothing, DdlSubProyecto, Nothing, LblSubProyecto)
DdlSubProyecto.SelectedValueExist("-1")
End Sub
@@ -188,7 +186,7 @@ Partial Class ACumuladores_RepIndicadorDiario
If txtFechaF.Text = "" Then FechaFn = ""
Dim SubProyecto = If(DdlSubProyecto.GetSelectedText = "", "", $"&emsp;<b>SubProyecto:</b> {DdlSubProyecto.GetSelectedText}")
Dim SubProyecto = If(DdlSubProyecto.SelectedItem.Text = "", "", $"&emsp;<b>SubProyecto:</b> {DdlSubProyecto.SelectedItem.Text}")
Dim FechaIF, FechaFF As String