AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

oi cambios

Browse Source
This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2020-05-02 11:24:04 -07:00
parent c84d4e3863
commit a7d5417c2a
7 changed files with 386 additions and 89 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
OI/RepTareas.aspx.vb
View File

@@ -66,6 +66,7 @@ Partial Class OI_RepTareas
CargaDatosOIEventosTareasAsigne()
CargaDatosOIEventosTareasCCP()
End If
UpGrafica.Update()
End Sub
Private Sub CargaFiltros()
@@ -108,7 +109,7 @@ Partial Class OI_RepTareas
If ObjProspectos.GetRepEventos(-1, -1, -1, "-1", "-1", -1, -1, -1, CveEventoEstatus, DdlRevision.SelectedValue.ToEntero, -1, "-1", -1, -1, -1, -1, -1, -1, -1, -1, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FechaI, FechaF, TipoReporte:=TipoReporte) Then
DTOIEventosTareas = ObjProspectos.DtResultados.FiltraParametros(String.Format("CveUsuarioPara = {0} AND CveTipoEvento IN (1,3)", UsuarioActual.CveUsuario))
ltlGrafMEasiginaron.Text = DTOIEventosTareas.Rows.Count.ToString()
'BURBUJITAS - BADGE
If DTOIEventosTareas.FiltraParametros("EventoEstatus = 'Pendiente'").Rows.Count > 0 Then
LtBurbujitaAsignaronPendientes.Text = String.Format("<span Class='badge badge-danger' data-toggle='tooltip' data-placement='bottom' title='Pendientes'>{0}</span>", DTOIEventosTareas.FiltraParametros("EventoEstatus = 'Pendiente'").Rows.Count)
@@ -175,7 +176,7 @@ Partial Class OI_RepTareas
If ObjProspectos.GetEventosUsuarioCCP(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 1, DdlRevision.SelectedValue.ToEntero, FechaI, FechaF, CveEventoEstatus) Then
DTOIEventosTareasCCP = ObjProspectos.DtResultados.FiltraParametros(String.Format("CveUsuarioIng = {0} And CveTipoEvento In (1,3)", UsuarioActual.CveUsuario))
ltlgrafCcp.Text = DTOIEventosTareasCCP.Rows.Count.ToString()
'BURBUJITAS - BADGE
If DTOIEventosTareasCCP.FiltraParametros("EventoEstatus = 'Pendiente'").Rows.Count > 0 Then
LtBurbujitaCCPPendientes.Text = String.Format("<span Class='badge badge-danger' data-toggle='tooltip' data-placement='bottom' title='Pendientes'>{0}</span>", DTOIEventosTareasCCP.FiltraParametros("EventoEstatus = 'Pendiente'").Rows.Count)
@@ -242,7 +243,7 @@ Partial Class OI_RepTareas
If ObjProspectos.GetRepEventos(-1, -1, -1, "-1", "-1", -1, -1, -1, CveEventoEstatus, DdlRevision.SelectedValue.ToEntero, -1, "-1", -1, -1, -1, -1, -1, -1, -1, -1, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FechaI, FechaF, TipoReporte:=TipoReporte) Then
DTOIEventosTareasAsigne = ObjProspectos.DtResultados.FiltraParametros(String.Format("CveUsuarioIng = {0} And CveTipoEvento In (1,3)", UsuarioActual.CveUsuario))
ltlgrafAsigne.Text = DTOIEventosTareasAsigne.Rows.Count.ToString()
'BURBUJITAS - BADGE
If DTOIEventosTareasAsigne.FiltraParametros("EventoEstatus = 'Pendiente'").Rows.Count > 0 Then
LtBurbujitaAsignePendientes.Text = String.Format("<span Class='badge badge-danger' data-toggle='tooltip' data-placement='bottom' title='Pendientes'>{0}</span>", DTOIEventosTareasAsigne.FiltraParametros("EventoEstatus = 'Pendiente'").Rows.Count)