diff --git a/App_Code/ClsContabilidad.vb b/App_Code/ClsContabilidad.vb index 4a344b992..22263859e 100644 --- a/App_Code/ClsContabilidad.vb +++ b/App_Code/ClsContabilidad.vb @@ -5721,7 +5721,12 @@ Public Class ClsContabilidad SqlAdapter.Fill(Data) Retorno = True Catch ex As Exception - Me.OnError("Ocurrió un error al agregar la cuenta asignación", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + If ex.Message.Contains("UK_Conta_CuentasAsignaciones") Then + Me.OnError("La Asignación ya fue especificada previamente.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo(), TipoMensaje.MsgAdvertencia) + Else + Me.OnError("Ocurrió un error al agregar la cuenta asignación", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + End If + End Try Return Retorno