From f8a03a5f42a8417f46c0413d170fe216602ef47d Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Sat, 22 Feb 2025 10:42:34 -0700 Subject: [PATCH] --FIX ventas --- Ventas/Ventas.aspx | 2 +- Ventas/Ventas.aspx.vb | 12 ++++++++++++ 2 files changed, 13 insertions(+), 1 deletion(-) diff --git a/Ventas/Ventas.aspx b/Ventas/Ventas.aspx index fae59c8c7..ccdc66d0c 100644 --- a/Ventas/Ventas.aspx +++ b/Ventas/Ventas.aspx @@ -7438,7 +7438,7 @@ % - + diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb index 279a9660f..e5cc8fd16 100644 --- a/Ventas/Ventas.aspx.vb +++ b/Ventas/Ventas.aspx.vb @@ -31361,6 +31361,18 @@ Partial Class Ventas AplicarNC(DdlNCPS.SelectedValue.ToEntero(), EsNCAmortizacion:=ChkAplicaNCAnticipo.Checked, AplicaImpuestosLocales:=AplicaImpuestosLocales, AplicaNuevoDocumento:=AplicaNuevoDocumento, AplicoNCFacturaActual:=True) + If UsuarioActual.CveEmpresa.Contiene(199, 201) Then + TxtObsFact.Text = "" + TxtOrdenCompra.Text = "" + TxtPedidoContrato.Text = "" + TxtObsAlmacen.Text = "" + + TxtObsFact.Enabled = True + TxtOrdenCompra.Enabled = True + TxtPedidoContrato.Enabled = True + TxtObsAlmacen.Enabled = True + End If + End Sub Private Sub AplicarNC(CvePS As Integer, Optional NCDescuento As Boolean = False, Optional EsNCAmortizacion As Boolean = False, Optional AplicaImpuestosLocales As Boolean = True, Optional AplicaNuevoDocumento As Boolean = False, Optional AplicoNCFacturaActual As Boolean = False, Optional TipoDoctoNC As String = "Egs")