diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb index 9b858b8b5..18ce5b3c0 100644 --- a/Ventas/Ventas.aspx.vb +++ b/Ventas/Ventas.aspx.vb @@ -5611,6 +5611,9 @@ Partial Class Ventas 'LO NO PERMITIDO MODIFICAR e.Row.FCDropDownList("DdlUnidadMedida").Enabled = False + If UsuarioActual.CveEmpresa = 119 Then + e.Row.FCTextBox("TxtCantidad").Enabled = False + End If 'e.Row.FCDropDownList("DdlClasificacion").Enabled = False 'e.Row.FCDropDownLost("DdlPS").Enabled = False @@ -16265,7 +16268,7 @@ Partial Class Ventas Next 'ACTIVA CAMBIO DE CLIENTE - SI NO TIENE NADA FACTURADO - If Not CantidadFacturadaRemision > 0 Then + If Not CantidadFacturadaRemision > 0 AndAlso UsuarioActual.TienePermisoProceso(284) Then HlCliente.Attributes.Remove("class") HlCliente.Attributes.Add("class", "Texto") TxtCodigo.ReadOnly = False