-- saldos de anticipos con impuestos

- columna de moneda en impuestos

Ventas/Clientes.aspx.vb

@@ -922,7 +922,7 @@ Partial Class Clientes
                 LnkPersonaFisica.Visible = True
             End If
 
-            InicializaDevolverDinero()
+            'InicializaDevolverDinero()
 
             TxtFechaICredito.Text = NowADS().AddYears(-2).ToShortDateString()
             TxtFechaFCredito.Text = NowADS().ToShortDateString()
@@ -1956,12 +1956,8 @@ Partial Class Clientes
             DtClientesAnticipo = Nothing
             GVAnticiposHistorial.DataSource = Nothing
             DtAnticipoHistorial = Nothing
-        End If
+        End If
         ObjMovtos.Dispose()
-
-        'If UsuarioActual.Empresa.Funcionalidad(185) = "1" AndAlso UsuarioActual.TienePermisoProceso(379) Then
-        '    GVAnticipos.Columns(7).Visible = True
-        'End If
 
         GVAnticipos.DataBind()
         GVAnticiposHistorial.DataBind()
@@ -8086,7 +8082,7 @@ Partial Class Clientes
 #Region "  DEVOLVER DINERO ANT/NC  "
     Private Sub InicializaDevolverDinero()
         If UsuarioActual.TienePermisoProceso(247) Then
-            GVAnticipos.Columns(6).Visible = True
+            GVAnticipos.Columns(7).Visible = True
         End If
     End Sub
 #End Region
@@ -10777,6 +10773,7 @@ Partial Class Clientes
         TxtDevRedondeo.Text = ""
         DdlCuentaDeposito.DataSource = GlobalDTCuentasDepositosClientes(UsuarioActual.CveEmpresa, CveCliente:=CveCliente)
         DdlCuentaDeposito.DataBind()
+        GVAnticipos.Columns(7).Visible = True
         'Dim Dep As New ClsGenerales
         'If Dep.GetCuentasDepositos(CveCliente:=CveCliente, CveEmpresa:=UsuarioActual.CveEmpresa) Then
         '    DdlCuentaDeposito.DataSource = Dep.DtResultados