AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

-- mejora en manejo de CRM

Browse Source
This commit is contained in:
rrene
2024-02-10 08:57:17 -07:00
parent 4eb0fa3b6f
commit f4e4542f0b
1 changed files with 9 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
Ventas/Clientes.aspx.vb
View File

@@ -777,14 +777,15 @@ Partial Class Clientes
'CARGA LOS FILTROS DEL TAB COMPORTAMIENTO VENTA 'CARGA LOS FILTROS DEL TAB COMPORTAMIENTO VENTA
TabComportamientoVentas.Visible = True TabComportamientoVentas.Visible = True
CargaFiltros() CargaFiltros()
'JM 05-02-19: CRM 'JM 05-02-19: CRM
If UsuarioActual.Empresa.UsaCRM Then 'If UsuarioActual.Empresa.UsaCRM Then
VerificaVinculacion() If GlobalDTCRMTipoProceso(UsuarioActual.CveEmpresa).Rows.Count > 0 Then
UpAccionesCRM.Update() VerificaVinculacion()
End If UpAccionesCRM.Update()
End If
If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then 'si es acumuladora If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then 'si es acumuladora
'AndAlso UsuarioActual.CveRol.Contiene(1280, 1511) 'AndAlso UsuarioActual.CveRol.Contiene(1280, 1511)
If Not PermiteEditar() Then 'sino puede editar todos los datos del cliente, se bloquean los de distribuidor If Not PermiteEditar() Then 'sino puede editar todos los datos del cliente, se bloquean los de distribuidor