diff --git a/App_Code/ClsSisRoles.vb b/App_Code/ClsSisRoles.vb index 6cc5d759b..0df89d1ae 100644 --- a/App_Code/ClsSisRoles.vb +++ b/App_Code/ClsSisRoles.vb @@ -329,6 +329,26 @@ Public Class ClsSisRoles Return Retorno End Function + Public Function UpdateRolAdjunto(CveRol As Integer, Adjunto As String, CveEmpresa As Integer) As Boolean + Dim Retorno As Boolean = False + DataAdapter("PA_Sis_RolAdjuntoUpdate") + + With SqlAdapter.SelectCommand.Parameters + .Add("@CveRol", SqlDbType.Int).Value = CveRol + .Add("@Adjunto", SqlDbType.VarChar).Value = Adjunto + .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa + End With + + Try + SqlAdapter.Fill(Data) + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al actualizar el adjunto del rol.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + End Function + ' IDisposable Protected Overridable Sub Dispose(ByVal disposing As Boolean) If Not Me.disposedValue Then diff --git a/SigAyuda.aspx b/SigAyuda.aspx index fcf0a1a56..4b4f934bf 100644 --- a/SigAyuda.aspx +++ b/SigAyuda.aspx @@ -6,13 +6,15 @@