RH/CatAsistenciasInasistencias.aspx.vb

@@ -79,7 +79,7 @@ Partial Class RH_CatAsistenciasInasistencias
     Protected Sub LbAgregar_Click(sender As Object, e As System.EventArgs) Handles BtnAgregarTiposDModal.Click 'esta funcion es la que agrega un nuevo motivo de baja se activa con el boton "Agregar" de la ventana modal"
         Dim ObjAsistenciasInasistencias As New ClsRH
         Dim chkAplicaFalta As Boolean = AplicaFalta.Checked
-        Dim chkAplicaNoAplica As Boolean = Not AplicaNoAplica.Checked
+        Dim chkAplicaNoAplica As Boolean = AplicaNoAplica.Checked
         Dim chkAplicaVacacion As Boolean = AplicaVacacion.Checked
         Dim chkAplicaIncapacidad As Boolean = AplicaIncapacidad.Checked
         Dim chkAplicaRetardo As Boolean = AplicaRetardo.Checked
@@ -154,7 +154,7 @@ Partial Class RH_CatAsistenciasInasistencias
         Dim Tipo As String = TipoTxt.Text.Trim
         Dim TipoCorto As String = TxtTipoCorto.Text.Trim
         Dim Estatus As Boolean = ChkEstatus.Checked
-        Dim ckAplicaFalta As Boolean = Not AplicaFalta.Checked
+        Dim ckAplicaFalta As Boolean = AplicaFalta.Checked
         Dim AplicaAsistencia As Boolean = AplicaNoAplica.Checked
         Dim CveAsistenciasInasistencias As Integer = CveTipoAsisAEditar 'aquí obtenemos el valor de la propiedad que utilizamos en el metodo "GvDatos_RowEditing"