Cambios en lineas adicionales

2022-09-28 14:04:03 -07:00
parent 71e2639c91
commit 232376f2a8
3 changed files with 685 additions and 667 deletions
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -18071,7 +18071,7 @@ Partial Class Ventas
    End Sub

    Private Sub CalculaLineasAdicionales()
-        If DdlTipoComprobante.SelectedValue = "Ing" AndAlso UsuarioActual.Empresa.Funcionalidad(705) = "1"  Then
+        If DdlTipoComprobante.SelectedValue.Contiene("Ing", "Rem") AndAlso UsuarioActual.Empresa.Funcionalidad(705) = "1" Then
            DdlLineaAdicional.DataSource = Nothing

            Using ObjVentas As New ClsVentas