Cambio para mostrar correctamente el error al hacer un cierre de ejercicio

This commit is contained in:
HECTOR RODRIGUEZ
2021-05-22 12:05:47 -07:00
parent 1a824a42b7
commit 9940c89c0c

View File

@@ -5924,7 +5924,11 @@ Public Class ClsContabilidad
SqlAdapter.Fill(Data)
Retorno = SqlAdapter.SelectCommand.Parameters("@CvePrePoliza").Value.ToString.ToEntero
Catch ex As Exception
Me.OnError("Ocurrió un error al eliminar el catálogo de Conta Ejercicios", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
If ex.Message.Contains("50000") Then
Me.OnError("No se puede registrar una prepóliza en un periodo cerrado.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
Else
Me.OnError("Ocurrió un error al cerrar el Ejercicio", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End If
End Try
Return Retorno