diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb
index d187b5980..a72b6a8ea 100644
--- a/App_Code/ClsNominas.vb
+++ b/App_Code/ClsNominas.vb
@@ -2293,6 +2293,23 @@ Public Class ClsNominas
End Function
#End Region
+ Public Function ValidaFechaFinPersonal(CvePersonal As Integer, CveEmpresa As Integer, FechaFin As String)
+ Dim Retorno As Boolean = False
+ DataAdapter("PA_Nom_ValidaFechaFinPersonal")
+ With SqlAdapter.SelectCommand.Parameters
+ .Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal
+ .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+ .Add("@FechaFin", SqlDbType.DateTime).Value = FechaFin
+ '.Add("@Limpiar", SqlDbType.Int).Value = Limpiar
+ End With
+ Try
+ SqlAdapter.Fill(Data)
+ Retorno = True
+ Catch ex As Exception
+ OnError("Ocurrió un error al validar el finiquito.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+ End Try
+ Return Retorno
+ End Function
Public Function GetFiniquitosPersonal(CvePersonal As Integer, CveEmpresa As Integer, Optional Limpiar As Integer = 0, Optional diasindemnizacion As Integer = 90) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Nom_FiniquitosGET")
diff --git a/Ventas/Clientes.aspx b/Ventas/Clientes.aspx
index 4bed83d04..006d047fa 100644
--- a/Ventas/Clientes.aspx
+++ b/Ventas/Clientes.aspx
@@ -3356,8 +3356,9 @@
+
-
+ <%----%>