diff --git a/App_Code/ClsOIEventos.vb b/App_Code/ClsOIEventos.vb index 6abe367d1..80a1ee26c 100644 --- a/App_Code/ClsOIEventos.vb +++ b/App_Code/ClsOIEventos.vb @@ -3089,6 +3089,29 @@ Public Class ClsOIEventos Return Retorno End Function + + Public Function UpdateDocumentoAutorizacion(CveAutorizacion As Integer, CveDocumento As Integer, Comentarios As String, Adjunto As String, FechaAprobacion As Date) As Boolean + Dim Retorno As Boolean = False + + DataAdapter("PA_OI_DocumentosAutorizacionesUpdate") + + With SqlAdapter.SelectCommand.Parameters + .Add("@CveAutorizacion", SqlDbType.Int).Value = CveAutorizacion + .Add("@CveDocumento", SqlDbType.Int).Value = CveDocumento + .Add("@Comentarios", SqlDbType.NVarChar).Value = Comentarios + .Add("@Adjunto", SqlDbType.NVarChar).Value = Adjunto + .Add("@FechaAprobacion", SqlDbType.Date).Value = FechaAprobacion + End With + + Try + SqlAdapter.Fill(Data) + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al agregar el usuario para autorizar el documento", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + End Try + + Return Retorno + End Function #End Region #End Region diff --git a/OI/DocumentoDetalle.aspx b/OI/DocumentoDetalle.aspx index d5af82e6c..74d725561 100644 --- a/OI/DocumentoDetalle.aspx +++ b/OI/DocumentoDetalle.aspx @@ -78,7 +78,7 @@