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

Merge branch 'master' of http://192.168.10.111:8383/SIG

Browse Source
This commit is contained in:
rrene
2024-03-16 12:41:11 -07:00
parent 16440a0fc8 fe3fc85bd9
commit 3385a7b88e
6 changed files with 154 additions and 30 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
Ventas/Clientes.aspx.vb
View File

@@ -723,20 +723,18 @@ Partial Class Clientes
TabCuentasEquipos.Visible = True
End If
If UsuarioActual.Empresa.Funcionalidad(504).ToEntero() > 0 Then
If UsuarioActual.TienePermisoProceso(162) Then
ChkPermiteCredito.Enabled = True
TxtLimiteCreditoSucursal.Enabled = True
TxtFechaLimiteCredito.Enabled = True
Else
ChkPermiteCredito.Enabled = False
TxtLimiteCreditoSucursal.Enabled = False
TxtFechaLimiteCredito.Enabled = False
End If
ChkEstado.Enabled = False
If UsuarioActual.TienePermisoProceso(180) Then
ChkEstado.Enabled = True
End If
If UsuarioActual.TienePermisoProceso(162) Then
ChkPermiteCredito.Enabled = True
TxtLimiteCreditoSucursal.Enabled = True
TxtFechaLimiteCredito.Enabled = True
Else
ChkPermiteCredito.Enabled = False
TxtLimiteCreditoSucursal.Enabled = False
TxtFechaLimiteCredito.Enabled = False
End If
ChkEstado.Enabled = False
If UsuarioActual.TienePermisoProceso(180) Then
ChkEstado.Enabled = True
End If
If UsuarioActual.Empresa.Funcionalidad(579) = "1" Then