diff --git a/App_Code/ClsRH.vb b/App_Code/ClsRH.vb
index 6fb81455d..806a0d125 100644
--- a/App_Code/ClsRH.vb
+++ b/App_Code/ClsRH.vb
@@ -2802,7 +2802,10 @@ Public Class ClsRH
             Retorno = True
         Catch Ex1 As SqlException
             If Ex1.Message.Contains("Número: 2627;") Then
-                Alert("Ya se registró la Asistencia para el empleado.", TipoMensaje.MsgAdvertencia)
+                Alert("Ya se registró la Asistencia 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
@@ -2830,7 +2833,10 @@ Public Class ClsRH
             Retorno = True
         Catch Ex1 As SqlException
             If Ex1.Message.Contains("Número: 2627;") Then
-                Alert("Ya se registró la Asistencia para el empleado.", TipoMensaje.MsgAdvertencia)
+                Alert("Ya se registró la Asistencia 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
@@ -2873,7 +2879,10 @@ Public Class ClsRH
             Retorno = True
         Catch Ex1 As SqlException
             If Ex1.Message.Contains("Número: 2627;") Then
-                Alert("Ya existe un Registro con el mismo nombre: " & CveAsistencia & ".", TipoMensaje.MsgAdvertencia)
+                Alert("Ya existe un Registro con el mismo nombre: " & CveAsistencia & ".", 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 el registro.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
             End If
@@ -2899,6 +2908,15 @@ Public Class ClsRH
         Try
             SqlAdapter.Fill(Data)
             Retorno = True
+        Catch Ex1 As SqlException
+            If Ex1.Message.Contains("Número: 2627;") Then
+                Alert("Ya existe un Registro con el mismo nombre: " & CveAsistencia & ".", 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 el registro.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+            End If
         Catch ex As Exception
             OnError("Ocurrió un error al guardar los cambios.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
         End Try
@@ -2919,7 +2937,10 @@ Public Class ClsRH
             Retorno = True
         Catch Ex1 As SqlException
             If Ex1.Message.Contains("Número: 547;") Then
-                Alert("El registro no se pudo eliminar porque está siendo usado.", TipoMensaje.MsgAdvertencia)
+                Alert("El registro no se pudo eliminar porque está siendo usado.", 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 eliminar el registro.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
             End If
@@ -2937,6 +2958,13 @@ Public Class ClsRH
         Try
             SqlAdapter.Fill(Data)
             Retorno = True
+        Catch Ex1 As SqlException
+            If 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
         Catch ex As Exception
             Me.OnError("Ocurrió un error al eliminar la asistencia.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
         End Try