que cargue todas las bitácoras del usuario, sin que considera el filtro de empresa

This commit is contained in:
2021-07-14 12:46:57 -07:00
parent e36d87c7ed
commit a1f9e6dc25

View File

@@ -4756,7 +4756,7 @@ Partial Class Sistemas_UsuarioDetalle
Private Sub CargaGvBitacora()
If CveUsuario > 0 Then
Dim ObjGral As New ClsGenerales()
If ObjGral.GetHistorialBitacora(-1, -1, -1, -1, -1, -1, -1, UsuarioActual.CveEmpresa, CveUsuario:=CveUsuario) Then
If ObjGral.GetHistorialBitacora(-1, -1, -1, -1, -1, -1, -1, -1, CveUsuario:=CveUsuario) Then ' UsuarioActual.CveEmpresa, se manda empresa -1
GvBitacoraHistorial.DataSource = ObjGral.DtResultados
ObjGral.Dispose()
End If