-

2023-12-08 08:29:39 -07:00
parent 805962d88e
commit 5520068c26
1 changed files with 2 additions and 2 deletions
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -21596,8 +21596,8 @@ Partial Class Ventas

        'BUSCA POR CODIGO DE BARRAS
        If Not CvePS > 0 AndAlso TxtCodigoBarras.Text.Trim() <> "" Then
-            CodigoBarras = TxtCodigoBarras.Text.Trim()
-            DrProducto = GlobalDTPSSimplificado(UsuarioActual.CveEmpresa).FiltroPrimero($"CodigoBarras = '{CodigoBarras}'")
+
+            DrProducto = GlobalDTPSSimplificado(UsuarioActual.CveEmpresa).FiltroPrimero($"CodigoBarras = '{TxtCodigoBarras.Text.Trim()}'")
            If DrProducto IsNot Nothing Then
                If DrProducto("Inv_CveMetodoInventario").ToString() = "5" OrElse DrProducto("AplicaSerie").ToString = "True" Then 'si es serie
                    TxtCodigoSerie.Focus()