This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2021-02-02 07:18:50 -07:00
parent e4330a0bae
commit 4b2d069746
10 changed files with 102 additions and 58 deletions

View File

@@ -96,10 +96,10 @@ public partial class AF_CatTiposServiciosActividades : ClsPaginas
}
else
{
if (ObjAF.UpdateActividades(DdlActividades.SelectedValue.ToEntero(),TxtDuracion.Text.ToEntero(),TxtObservaciones.Text))
{
Alert("Se actualizó la Actividad del Tipo de Servicio correctamente");
}
//if (ObjAF.UpdateActividades(DdlActividades.SelectedValue.ToEntero(),TxtDuracion.Text.ToEntero(),TxtObservaciones.Text,))
//{
// Alert("Se actualizó la Actividad del Tipo de Servicio correctamente");
//}
}
ObjAF.Dispose();
CargaDatos();

View File

@@ -47,21 +47,21 @@ Partial Class AF_ValesCombustible
DdlSubProyecto.DataBind()
DdlSubProyecto.Items.Insert(0, New ListItem("Seleccione", "-1"))
If UsuarioActual.Empresa.GralSoloProyecto Then
'If UsuarioActual.Empresa.GralSoloProyecto Then
LtlSubProyecto.Text = "Proyecto"
DdlSubProyecto.Items.Clear()
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()
DdlSubProyecto.Items.Insert(0, New ListItem("Seleccione", "-1"))
DivProyecto.Visible = False
'DdlProyecto.Items(0).Text = ""
Else
DivProyecto.Visible = True
DdlProyecto.DataSource = GlobalDTProyectos(UsuarioActual.CveEmpresa)
DdlProyecto.DataBind()
DdlProyecto.Items.Insert(0, New ListItem("Seleccione", "-1"))
End If
' LtlSubProyecto.Text = "Proyecto"
' DdlSubProyecto.Items.Clear()
' 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()
' DdlSubProyecto.Items.Insert(0, New ListItem("Seleccione", "-1"))
' DivProyecto.Visible = False
' 'DdlProyecto.Items(0).Text = ""
'Else
DivProyecto.Visible = True
DdlProyecto.DataSource = GlobalDTProyectos(UsuarioActual.CveEmpresa)
DdlProyecto.DataBind()
DdlProyecto.Items.Insert(0, New ListItem("Seleccione", "-1"))
'End If
DdlCombustible.DataSource = GlobalDTCombustibles(UsuarioActual.CveEmpresa)