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")