Seleccionar intermediaro en cobro a clientes

2023-04-11 16:21:58 -07:00
parent 38b5eec518
commit ac2ade417b
2 changed files with 5 additions and 1 deletions
--- a/Ventas/ClientesAbonar.aspx.vb
+++ b/Ventas/ClientesAbonar.aspx.vb
@@ -265,6 +265,10 @@ Partial Class Ventas_ClientesAbonar
                Dim dia As Integer = If(UsuarioActual.CveEmpresa = 13, Now.Day - 1, Now.Day)
                Fecha = (dia.ToString + "/" + Now.Month.ToString + "/" + Now.Year.ToString).ToDate

+                If UsuarioActual.Empresa.Funcionalidad(712) = "1" Then
+                    PorletIntermediario.Visible = True
+                End If
+
                If CargaCliente(CveCliente, CveMonedaFiltro) Then

                    IdCuentaBancaria = 0