diff --git a/Ventas/Clientes.aspx.vb b/Ventas/Clientes.aspx.vb
index 127298d4c..748caee5f 100644
--- a/Ventas/Clientes.aspx.vb
+++ b/Ventas/Clientes.aspx.vb
@@ -2085,15 +2085,15 @@ Partial Class Clientes
         UpAgregarSucursal.Update()
         UpDatos.Update()
     End Sub
-    Public Sub CargaAFAsignados()
-        Dim ObjAF As New ClsAF()
-        If ObjAF.GetActivosFijos(-1, UsuarioActual.CveEmpresa, "-1", "-1", -1, -1, "-1", -1, -1, -1, -1, -1, "-1", CveCliente) Then
-            GvAFAsignado.DataSource = ObjAF.DtResultados
-        Else
-            GvAFAsignado.DataSource = Nothing
-        End If
-        GvAFAsignado.DataBind()
-        ObjAF.Dispose()
+    Public Sub CargaAFAsignados()
+        'Dim ObjAF As New ClsAF()
+        'If ObjAF.GetActivosFijos(-1, UsuarioActual.CveEmpresa, "-1", "-1", -1, -1, "-1", -1, -1, -1, -1, -1, "-1", CveCliente) Then
+        '    GvAFAsignado.DataSource = ObjAF.DtResultados
+        'Else
+        '    GvAFAsignado.DataSource = Nothing
+        'End If
+        'ObjAF.Dispose()
+        'GvAFAsignado.DataBind()
     End Sub
     Private Sub CargaMetodosPago33()
         DdlMetodoPago33.Items.Clear()