diff --git a/Nomina/CatPeriodos.aspx.vb b/Nomina/CatPeriodos.aspx.vb index f3d8b51dd..59330e05f 100644 --- a/Nomina/CatPeriodos.aspx.vb +++ b/Nomina/CatPeriodos.aspx.vb @@ -24,6 +24,8 @@ Partial Class Nomina_CatPeriodos ViewState("Orden") = "" CargaTipoPeriodo() cargaEjercicios() + CargaTurnos() + CargaDatos() ''Permiso Registro @@ -62,6 +64,8 @@ Partial Class Nomina_CatPeriodos DdlTipoPeriodo.DataBind() DdlTipoPeriodoAdd.DataBind() + + End Sub Private Sub cargaEjercicios() @@ -76,6 +80,15 @@ Partial Class Nomina_CatPeriodos DdlEjercicio.Items.Insert(0, New ListItem("Todos", "-1")) End Sub + + Private Sub CargaTurnos() + DdlTurno.DataSource = GlobalDTTurno.FiltraParametros($"CveEmpresa = {UsuarioActual.CveEmpresa}") + DdlTurno.DataBind() + DdlTurno.Items.Insert(0, New ListItem("Seleccione uno", "-1")) + End Sub + + + #End Region #Region "G V D A T O S" @@ -329,6 +342,7 @@ Partial Class Nomina_CatPeriodos TxtFechaInicioAdd.Text = "" TxtFechaFinAdd.Text = "" DdlEstatusAdd.SelectedValueExist(-1) + DdlTurno.SelectedValueExist(-1) For Each item As ListItem In CBLchk.Items Select Case item.Value.ToEntero() Case 1 diff --git a/Ventas/RepCancelacionesVentas.aspx b/Ventas/RepCancelacionesVentas.aspx index 70797cb45..303327e11 100644 --- a/Ventas/RepCancelacionesVentas.aspx +++ b/Ventas/RepCancelacionesVentas.aspx @@ -50,6 +50,12 @@