diff --git a/App_Code/ClsEdocumentacion.vb b/App_Code/ClsEdocumentacion.vb index b06f629cf..dc764e2bb 100644 --- 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