diff --git a/Ventas/Clientes.aspx.vb b/Ventas/Clientes.aspx.vb index daa096874..cfa20e4e5 100644 --- a/Ventas/Clientes.aspx.vb +++ b/Ventas/Clientes.aspx.vb @@ -1475,6 +1475,10 @@ Partial Class Clientes LtlTareaNueva.Text = String.Format(" Tarea", CveCliente) BtnEliminar.Visible = PermiteEliminar() BtnGuardar.Visible = PermiteEditar() + 'condicion especial. + If UsuarioActual.Empresa.Funcionalidad(382) = "1" AndAlso CveCliente = 1582883 Then 'que no se pueda editar. INGRESOS NO IDENTIFICADOS + BtnGuardar.Visible = False + End If CargaDdlSucursalCliente() CargaDocumentosVenta(CveCliente)