-- activar cambiar datos de usocfdi, en Anticipos no timbrados

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