-- REGENERA GLOBAL
This commit is contained in:
@@ -119,9 +119,7 @@ Partial Class Ventas_ClientesClasificaciones
|
|||||||
|
|
||||||
|
|
||||||
Private Sub CargaGlobal()
|
Private Sub CargaGlobal()
|
||||||
Dim ObjClientes As New ClsClientes
|
GlobalDTClienteClasificaciones(UsuarioActual.CveEmpresa) = Nothing
|
||||||
If ObjClientes.GetClienteClasificacion(-1) Then Application("GlobalDTClienteClasificaciones") = ObjClientes.DtResultados Else Application("GlobalDTClienteClasificaciones") = Nothing
|
|
||||||
ObjClientes.Dispose()
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user