-- corrección sino se visualiza la lista de precio, que no pida el dato

2025-02-18 08:05:55 -07:00
parent 96f5c2ac3a
commit 6266f9c5f7
1 changed files with 1 additions and 1 deletions
--- a/Ventas/ProductosServicios.aspx.vb
+++ b/Ventas/ProductosServicios.aspx.vb
@@ -1456,7 +1456,7 @@ Partial Class ProductosyServicios
            Exit Sub
        End If

-        If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
+        If UsuarioActual.Empresa.Funcionalidad(382) = "1" AndAlso ChkAplicaParaVenta.Checked Then
            Dim tcontador As Integer = 0
            For Each GvRow As GridViewRow In GvPLMultiple.Rows
                Dim CvePrecioLista As Integer = GvRow.DataKey("CvePrecioLista").ToEntero()