diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb index 575f4b57f..9c4fb6c73 100644 --- a/Ventas/Ventas.aspx.vb +++ b/Ventas/Ventas.aspx.vb @@ -2820,24 +2820,16 @@ Partial Class Ventas CargaRelacionadasPendientes() End If - 'DdlSucursal.Enabled = False DdlSubProyectoDatos.Enabled = False BtnEmitirImprimir.Visible = False BtnCrearApartirDe.Visible = True - If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then - BtnCrearApartirDe.Visible = False - End If - If UsuarioActual.TienePermisoProceso(302) AndAlso DdlTipoComprobante.SelectedValue = "Ing" Then BtnEditar.Visible = True + If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then BtnCrearApartirDe.Visible = False - If UsuarioActual.TienePermisoProceso(302) AndAlso DdlTipoComprobante.SelectedValue = "Egs" AndAlso LblSeTimbro.Text = "No" Then - BtnEditar.Visible = True - End If - 'DdlEstatus.Enabled = True + If UsuarioActual.TienePermisoProceso(302) AndAlso DdlTipoComprobante.SelectedValue.Contiene("Ing", "Ant", "Egs") AndAlso LblSeTimbro.Text = "No" Then BtnEditar.Visible = True DivFechaAnticipoCliente.Visible = True TxtFechaAnticipoCliente.Text = Now.ToShortDateString - ImgAddObs.Visible = True CargaEventoBitacora()