- se quito funcionalidad 520 al emitir complemento

2020-03-04 11:25:53 -07:00
parent b62f5388ef
commit b085b2c852
2 changed files with 2 additions and 7 deletions
--- a/Ventas/ClientesAbonar.aspx.vb
+++ b/Ventas/ClientesAbonar.aspx.vb
@@ -333,12 +333,7 @@ Partial Class Ventas_ClientesAbonar
                    ElseIf CveMoneda = -1 Then
                        TxtFechaDocumento.Attributes.Add("onchange", "CambiaTC(this);")
                        TxtTCDolares.Text = GlobalTipoCambio(Fecha).FormatoNumero(4)
-                        TxtTC.Text = GlobalTipoCambio(Fecha).FormatoNumero(4)
-                    End If
-
-                    If UsuarioActual.Empresa.Funcionalidad(520) = "1" Then
-                        ChkComplementoPago.Visible = True
-                        'ChkComplementoPago.Checked = True
+                        TxtTC.Text = GlobalTipoCambio(Fecha).FormatoNumero(4)
                    End If

                    If UsuarioActual.TienePermisoProceso(209) Or UsuarioActual.TienePermisoProceso(204) Then