Nomina/ReportePTU.aspx.vb

@@ -71,7 +71,7 @@ Partial Class Nomina_ReportePTU
 
     Private Sub CargaPeriodos()
         Dim ObjPeriodos As New ClsNominas()
-        If ObjPeriodos.GetPeriodos(-1, UsuarioActual.CveEmpresa, DdlEjercicios.SelectedValue.ToEntero, -1, -1) Then
+        If ObjPeriodos.GetPeriodos(-1, UsuarioActual.CveEmpresa, DdlEjercicios.SelectedValue.ToEntero(), -1, -1) Then
             dtPeriodos = ObjPeriodos.DtResultados.FiltraParametros("Estatus IN (0,1)")
         End If
         ObjPeriodos.Dispose()
@@ -86,7 +86,7 @@ Partial Class Nomina_ReportePTU
         GVTipoPeriodo.DataSource = GlobalDTTipoPeriodo.FiltraParametros($"Estatus = 'Activo' AND CveTipoPeriodo IN({listaCveTipoPeriodo.ToString()})")
         GVTipoPeriodo.DataBind()
 
-        If (Not IsNothing(dtPeriodos) AndAlso dtPeriodos.Rows.Count()) Then
+        If (Not IsNothing(dtPeriodos) AndAlso dtPeriodos.Rows.Count() > 0) Then
             DdlPeriodo.DataSource = dtPeriodos.FiltraParametros("CveTipoPeriodo=6")
 
         End If
@@ -97,6 +97,7 @@ Partial Class Nomina_ReportePTU
 
     Protected Sub DdlPeriodo_SelectedIndexChanged(sender As Object, e As EventArgs)
         PnlTipoPeriodos.Visible = (DdlPeriodo.SelectedValue.ToEntero() <= 0)
+        UpModalAutorizar.Update()
     End Sub
     'Protected Sub DdlTipoPeriodo_SelectedIndexChanged(sender As Object, e As EventArgs)
     '    CargaPeriodos()