diff --git a/App_Code/ClsRH.vb b/App_Code/ClsRH.vb
index c642bf35c..aa784c42c 100644
--- a/App_Code/ClsRH.vb
+++ b/App_Code/ClsRH.vb
@@ -2163,11 +2163,18 @@ chkAplicaVacacion As Boolean, chkAplicaIncapacidad As Boolean, chkAplicaRetardo
Try
SqlAdapter.Fill(Data)
Retorno = True
- Catch Ex1 As SqlException
- If Ex1.Message.Contains("Número: 2627;") Then
+ Catch Ex1 As SqlException
+
+ If Ex1.Message.Contains("UK_Idx_Vw_Val_Nom_Curps") Then
+ Alert(String.Format("El personal no se guardó, el campo CURP '{0}' ya se encuentra registrado en otro empleado.", CURP), TipoMensaje.MsgAdvertencia)
+ ElseIf Ex1.Message.ToUpper.Contains("RFC") Then
+ Alert(String.Format("El personal no se guardó, el campo RFC '{0}' ya se encuentra registrado en otro empleado.", RFC), TipoMensaje.MsgAdvertencia)
+ ElseIf Ex1.Message.ToUpper.Contains("CODIGO") Then
+ Alert(String.Format("El personal no se guardó, el campo codigo '{0}' ya se encuentra registrado en otro empleado.", Codigo), TipoMensaje.MsgAdvertencia)
+ ElseIf Ex1.Message.Contains("Número: 2627;") Then
Alert("El Personal no se guardó debido a que actualmente se encuentra registrado.", TipoMensaje.MsgAdvertencia)
- ElseIf Ex1.Message.Contains("TR_RH_PersonalAltas000") Then
- Alert("El personal no se guardó el periodo de inicio y fin laboral del empleado está en conflicto con los anteriores, si es un reingreso favor de ingresar una fecha inicio mayor a la última fecha baja registrada.", TipoMensaje.MsgAdvertencia)
+ ElseIf Ex1.Message.Contains("TR_RH_PersonalAltas") Then
+ Alert("El personal no se guardó, el periodo de inicio y fin laboral del empleado está en conflicto con los anteriores, si es un reingreso favor de ingresar una fecha inicio mayor a la última fecha baja registrada.", TipoMensaje.MsgAdvertencia)
GuardaLog(String.Format("{0} DESCRIPCIÓN DETALLADA: {1} {2} {3}", "Ocurrió un error al intentar guardar los cambios en el Personal.", Ex1.ToString, vbCrLf, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()))
Else
Me.OnError("Ocurrió un error al intentar guardar los cambios en el Personal.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
diff --git a/GPS/Asistencia.rdlc b/GPS/Asistencia.rdlc
index e20d350f1..6f768215b 100644
--- a/GPS/Asistencia.rdlc
+++ b/GPS/Asistencia.rdlc
@@ -601,7 +601,7 @@
=Fields!PorcentajePago.Value
@@ -615,32 +615,13 @@
0.5pt
-
- Gray
-
- 0.5pt
-
-
- Gray
-
- 0.5pt
-
-
- Gray
-
- 0.5pt
-
-
- Gray
-
- 0.5pt
- 2pt2pt2pt2pt
+ true
@@ -743,7 +724,6 @@
2pt
- true
@@ -823,7 +803,7 @@
DataSet1
- 2.11349cm
+ 3.2953cm0.31432cm1.2cm18.8639cm
@@ -861,9 +841,9 @@
Textbox150.57891cm
- 0.31432cm
+ 3.59515cm0.9175cm
- 18.8639cm
+ 12.27578cm1
+
+ true
+ true
+
+
+
+
+ =Parameters!Filtros.Value
+
+
+
+
+
+
+ Textbox2
+ 2.51891cm
+ 0.31432cm
+ 0.6cm
+ 16.6814cm
+ 2
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ Embedded
+ VSH
+ FitProportional
+ 0.38391cm
+ 0.31432cm
+ 1.84396cm
+ 3.28083cm
+ 3
+
+
+
+
- 1.65554in
+ 1.92637in