diff --git a/Ventas/Clientes.aspx.vb b/Ventas/Clientes.aspx.vb
index e0fab1824..bff2d9844 100644
--- a/Ventas/Clientes.aspx.vb
+++ b/Ventas/Clientes.aspx.vb
@@ -1974,6 +1974,7 @@ Partial Class Clientes
         If ObjMovtos.GetCxCClienteDetalle(CveCliente, "-1", "-1", -1, -1, UsuarioActual.CveEmpresa, DdlSucursalCliente.SelectedValue.ToEntero()) Then
             DtCxCActivas = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Act'", "Moneda, OrdenVencimiento, FechaVencimiento")
             GvCxC.DataSource = DtCxCActivas
+            If DtCxCActivas.MAX("LineaAdicional") = "" Then GvCxC.Columns(6).Visible = False
             'solo tomo los 10 ultimos mas el totalizador general
             Dim dt As DataTable = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Hist'")
             DtHistorialCxC = dt