diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb
index 5239a3524..b9ce81522 100644
--- a/App_Code/ClsNominas.vb
+++ b/App_Code/ClsNominas.vb
@@ -353,6 +353,14 @@ Public Class ClsNominas
         Try
             SqlAdapter.Fill(DTSet)
             retorno = True
+
+        Catch Ex1 As SqlException
+            If Ex1.Message.Contains("x50102;") Then
+                Alert("No se puede eliminar el finiquito ya que se encuentra vinculado a un periodo autorizado.", TipoMensaje.MsgAdvertencia)
+                GuardaLog(String.Format("{0} DESCRIPCIÓN DETALLADA: {1} {2} {3}", "Ocurrió un error al  eliminar finiquito ", Ex1.ToString, vbCrLf, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()))
+            Else
+                Me.OnError("Ocurrió un error al  consultar  las vacaciones.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+            End If
         Catch ex As Exception
             OnError("Ocurrió un error al eliminar el finiquito.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
         End Try
diff --git a/App_Code/ClsRH.vb b/App_Code/ClsRH.vb
index 1bdf423cc..b0d5a6a97 100644
--- a/App_Code/ClsRH.vb
+++ b/App_Code/ClsRH.vb
@@ -2063,7 +2063,7 @@ chkAplicaVacacion As Boolean, chkAplicaIncapacidad As Boolean, chkAplicaRetardo
         CveJornada As Integer, IdCtaContPersonal As Integer, CtaContPersonal As String, IdCtaContPrestamos As Integer, CtaContPrestamos As String, CveEmpresa As Integer, CveUsuarioNomina As Integer, Optional CveSubProyectoZona As Integer = Nothing, Optional CveUniforme As Integer = -1,
         Optional TelefonoExtension As String = "-1", Optional CelularPersonal As String = "-1", Optional TelefonoMarcadoRapido As String = "-1", Optional ContactoAlterno As String = "-1", Optional CveUsuarioModifico As Integer = -1,
         Optional FechaActivo As Date = MinFecha, Optional FechaReingreso As Date = MinFecha, Optional CveTipodeSalario As Integer = 1, Optional Sindicalizado As Integer = -1, Optional CvePais As Integer = -1, Optional Pensionado As Boolean = False, Optional CveRegistroPatronal As Integer = -1,
-        Optional CveEmpresaAsignado As Integer = -1, Optional CveMedioTransporte As Integer = -1, Optional EsReserva As Integer = -1) As Boolean
+        Optional CveEmpresaAsignado As Integer = -1, Optional CveMedioTransporte As Integer = -1, Optional EsReserva As Integer = -1, Optional Fiscalizable As Integer = -1) As Boolean
 
         Dim Retorno As Boolean = False
 
@@ -2155,9 +2155,7 @@ chkAplicaVacacion As Boolean, chkAplicaIncapacidad As Boolean, chkAplicaRetardo
             .Add("@CveEmpresaAsignado", SqlDbType.Int).Value = CveEmpresaAsignado
             .Add("@CveMedioTransporte", SqlDbType.Int).Value = CveMedioTransporte
             .Add("@EsReserva", SqlDbType.Int).Value = EsReserva
-
-
-
+            .Add("@Fiscalizable", SqlDbType.Int).Value = Fiscalizable
 
         End With
 
@@ -2583,7 +2581,10 @@ chkAplicaVacacion As Boolean, chkAplicaIncapacidad As Boolean, chkAplicaRetardo
             Retorno = True
         Catch Ex1 As SqlException
             If Ex1.Message.Contains("Número: 2627;") Then
-                Alert("Ya se registró la Asistencia del día " & Fecha & " para el empleado.", TipoMensaje.MsgAdvertencia)
+                Alert("Ya se registró la Asistencia del día " & Fecha & " para el empleado.", TipoMensaje.MsgAdvertencia)
+            ElseIf Ex1.Message.Contains("x50102;") Then
+                Alert("No se puede editar o agregar la asistencia ya que se encuentra vinculada a un periodo autorizado.", TipoMensaje.MsgAdvertencia)
+                GuardaLog(String.Format("{0} DESCRIPCIÓN DETALLADA: {1} {2} {3}", "Ocurrió un error al editar o agregar la asistencia ", Ex1.ToString, vbCrLf, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()))
             Else
                 Me.OnError("Ocurrió un error al guardar la Asistencia.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
             End If
diff --git a/RH/Personal.aspx b/RH/Personal.aspx
index 3af11e247..6ef865e35 100644
--- a/RH/Personal.aspx
+++ b/RH/Personal.aspx
@@ -627,6 +627,10 @@
                                                             <asp:Label AssociatedControlID="chkEsReserva" CssClass="lblforchk" runat="server" Text="Es reserva:"></asp:Label>
                                                             <asp:CheckBox ID="chkEsReserva" CssClass="chksino " Text=" " runat="server" />
                                                         </div>
+                                                        <div class="col-md-6">
+                                                            <asp:Label AssociatedControlID="chkNoFiscalizar" CssClass="lblforchk" runat="server" Text="No Fiscalizar:"></asp:Label>
+                                                            <asp:CheckBox ID="chkNoFiscalizar" CssClass="chksino " Text=" " runat="server" />
+                                                        </div>
                                                     </div>
                                                     <div class="row" style="display: none;">
                                                         <div class="col-md-6">
diff --git a/RH/Personal.aspx.vb b/RH/Personal.aspx.vb
index 9f88e5b69..de99328d3 100644
--- a/RH/Personal.aspx.vb
+++ b/RH/Personal.aspx.vb
@@ -1686,7 +1686,8 @@ Partial Class RH_Personal
                 DdlSubProyectoAsignado.SelectedValue = ObjPersonal.CveSubProyecto.ToString()
                 DdlSubProyectoAsignado_SelectedIndexChanged1(Nothing, Nothing)
                 DdlMedioTransporte.SelectedValueExist(drow("CveMedioTransporte").ToString())
-                chkEsReserva.Checked = (drow("CharolaForanea").ToString().ToUpper().Contiene("1", "TRUE"))
+                chkEsReserva.Checked = (drow("EsReserva").ToString().ToUpper().Contiene("1", "TRUE"))
+                chkNoFiscalizar.Checked = Not (drow("Fiscalizable").ToString().ToUpper().Contiene("1", "TRUE"))
                 cargatipoTrabajador()
                 DdlTipoTrabajador.SelectedValueExist(drow("CveTipoTrabajador").ToString())
                 cargaagrodeptos()
@@ -1980,7 +1981,7 @@ Partial Class RH_Personal
                DdlPrestamos.SelectedValue.ToEntero(), DdlPrestamos.SelectedItem.Text, UsuarioActual.CveEmpresa, DDLUsuarioNomina.SelectedValue.ToEntero(), DdlSubproyectoZona.SelectedValue.ToEntero(), CveUniforme:=DdlUniforme.SelectedValue.ToEntero(),
                TelefonoExtension:=TxtTelefonoExtension.Text, CelularPersonal:=TxtCelularPersonal.Text, TelefonoMarcadoRapido:=TxtTelefonoMarcadoRapido.Text, ContactoAlterno:="", CveUsuarioModifico:=UsuarioActual.CveUsuario,
                CveTipodeSalario:=DDlTipoSalario.SelectedValue.ToEntero(), Sindicalizado:=If(ChkSindicalizado.Checked, 1, 0), Pensionado:=ChkPensionado.Checked, CvePais:=DdlPais.SelectedValue.ToEntero(),
-               CveRegistroPatronal:=DdlRegistroPatronal.SelectedValue.ToEntero(), CveEmpresaAsignado:=DdlEmpresaAsignada.SelectedValue.ToEntero) Then
+               CveRegistroPatronal:=DdlRegistroPatronal.SelectedValue.ToEntero(), CveEmpresaAsignado:=DdlEmpresaAsignada.SelectedValue.ToEntero(), EsReserva:=If(chkEsReserva.Checked, 1, 0), Fiscalizable:=If(chkNoFiscalizar.Checked, 0, 1)) Then
 
                 'Funsion usa RH Familiares
                 If UsuarioActual.Empresa.Funcionalidad(568) = "1" Then
diff --git a/vwd.webinfo b/vwd.webinfo
index f70db6dd5..dcaca7aa9 100644
--- a/vwd.webinfo
+++ b/vwd.webinfo
@@ -518,6 +518,8 @@
     
   
     
+  
+