From 25944ea00d9bd4823ceb89246dfb9ca52736e3d6 Mon Sep 17 00:00:00 2001 From: rakcsle Date: Sat, 5 Mar 2022 13:05:16 -0700 Subject: [PATCH] Cat Periodos Turno no cargaba, Rep Cancelaciones re acomodo controles --- Nomina/CatPeriodos.aspx.vb | 14 +++++++++++ Ventas/RepCancelacionesVentas.aspx | 40 +++++++++++++++++------------- 2 files changed, 37 insertions(+), 17 deletions(-) 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 @@
+ + SubProyecto: +
+ + +
Fecha Inicio:
@@ -78,28 +84,28 @@
- SubProyecto: -
- - -
+ - -
- - -
+ +
+ + +
+
>
- -
- - -
+ + + + +
+ + +
@@ -114,7 +120,7 @@ @@ -126,8 +132,8 @@ - +