From 9eb739493e720acb2187157792f057c1e40c83cc Mon Sep 17 00:00:00 2001 From: rrene Date: Thu, 20 Jan 2022 15:07:33 -0700 Subject: [PATCH] =?UTF-8?q?visualizaci=C3=B3n=20litraje?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Ventas/ProductosServicios.aspx | 12 +++++++++--- Ventas/ProductosServicios.aspx.vb | 3 +++ 2 files changed, 12 insertions(+), 3 deletions(-) diff --git a/Ventas/ProductosServicios.aspx b/Ventas/ProductosServicios.aspx index 6f716c614..8c5172390 100644 --- a/Ventas/ProductosServicios.aspx +++ b/Ventas/ProductosServicios.aspx @@ -105,18 +105,18 @@
-
+
-
+
-
+
@@ -263,6 +263,12 @@
+
+ + <%----%> + + +



diff --git a/Ventas/ProductosServicios.aspx.vb b/Ventas/ProductosServicios.aspx.vb index ce0d2c41a..386782326 100644 --- a/Ventas/ProductosServicios.aspx.vb +++ b/Ventas/ProductosServicios.aspx.vb @@ -245,6 +245,8 @@ Partial Class ProductosyServicios If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then DivPSAdicionalVigencia.Visible = True divCodigo2.Visible = True + divLitraje.Visible = True + CargaPSAdicionalesVigencias() End If @@ -846,6 +848,7 @@ Partial Class ProductosyServicios TxtCodigo2.Text = ObjProductosServicios.Codigo2 TxtCodigoBarras.Text = ObjProductosServicios.CodigoBarras CodigoBarrasCargado = ObjProductosServicios.CodigoBarras + TxtLitraje.Text = ObjProductosServicios.DtResultados.Rows(0)("Litraje").ToString TxtPS.Text = ObjProductosServicios.PS TxtPrecio.Text = ObjProductosServicios.Precio.ToString("F4") 'no usa N4, porque pone comma