Error al querer eliminar documentacion con parametros

2021-05-20 13:01:16 -07:00
parent ae0eacf3d4
commit d33073e323
1 changed files with 5 additions and 1 deletions
--- a/App_Code/ClsEdocumentacion.vb
+++ b/App_Code/ClsEdocumentacion.vb
@@ -237,7 +237,11 @@ Public Class ClsEdocumentacion
            SqlAdapter.Fill(Data)
            Retorno = True
        Catch ex As Exception
-            OnError("Ocurrió un error al consultar el catalogo de documentación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+            If ex.Message.Contains("FK_Edoc_DocumentacionParametros_Edoc_Documentacion") Then
+                Alert("Este documento tiene parametros registrados", TipoMensaje.MsgAdvertencia)
+            Else
+                OnError("Ocurrió un error al eliminar la documentacion", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+            End If
        End Try

        Return Retorno