--FIX Varios

2024-12-14 13:20:17 -07:00
parent 91094e0a42
commit fa8f39cb45
4 changed files with 19 additions and 6 deletions
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -20033,6 +20033,7 @@ Partial Class Ventas
                Else
                    If Me.CvePrecioLista > 0 Then
                        CvePrecioListaPS = Me.CvePrecioLista
+
                        If UsuarioActual.Empresa.Funcionalidad(109) = "1" Then
                            PrecioListaPS = GlobalDTPrecioListas(UsuarioActual.CveEmpresa).FiltroPrimeroValor("PrecioLista", $"CvePrecioLista={CvePrecioListaPS}")
                        End If
@@ -20305,6 +20306,7 @@ Partial Class Ventas
        'CODIGO BARRAS
        TxtCodigoBarras.Text = ""
        TxtCodigoSerie.Text = ""
+        TxtTiempoEntrega.Text = ""

        'FOCUS DEPENDIENDO MODALIDAD DE CODIGO BARRAS
        If DIVCod.Visible Then