-- mensaje de asgnaciones duplicadas

2023-12-13 19:40:20 -07:00
parent 9acc09485c
commit 0b08ebd24c
1 changed files with 6 additions and 1 deletions
--- 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