This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2020-07-11 05:49:32 -07:00
parent 081680a0d6
commit bf82847ab9
7 changed files with 151 additions and 4 deletions

View File

@@ -448,7 +448,21 @@ Partial Class Site
End If
OC.Dispose()
End If
If UsuarioActual.TienePermisoProceso(303) Then
Using objgen As New ClsGenerales
pnlNotificacionSAT.Visible = True
objgen.SAT_DescargaSolicitudesAddNotificacionesCOUNT(UsuarioActual.CveEmpresa)
If objgen.DtResultados.Rows.Count > 0 Then
For Each dtrow As DataRow In objgen.DtResultados.Rows
If dtrow("Contador").ToString().ToEntero() > 0 Then
Notificaciones.Append(ItemNotificaciones(String.Format("Se registro una solicitud de descarga del sat con {0} XML del SAT", dtrow("Contador")), Ico:="fa fa-tags", Tipo:="info", Link:=String.Format("javascript:$('#{0}').val({1});$('#{2}').click();", TxtCveNotisat.ClientID, dtrow("CveSolicitudSat").ToString().ToEntero(), btnoknotisat.ClientID), tonewpage:=False)) '
countNotificaciones = countNotificaciones + 1
End If
Next
End If
End Using
End If
''OC Pendientes por atender
'Dim OC As New ClsOC
@@ -527,6 +541,17 @@ Partial Class Site
#End Region
Protected Sub btnoknotisat_Click(sender As Object, e As EventArgs)
GVnotiFoliosSAT.DataSource = New DataTable()
Using objgen As New ClsGenerales
objgen.SAT_DescargaSolicitudesAddNotificaciones(UsuarioActual.CveEmpresa, TxtCveNotisat.Text.ToEntero())
GVnotiFoliosSAT.DataSource = objgen.DtResultados
End Using
GVnotiFoliosSAT.DataBind()
UpNotificacionesFoliosSAT.Update()
RegistraScript(String.Format("$('#{0}').modal();", pnlNotificacionSAT.ClientID))
End Sub
End Class
Public Class TipoCambioActual
Public Fecha As Date