-- cambios en acceso
This commit is contained in:
@@ -742,7 +742,7 @@ Public Class WS_PuntoVenta
|
||||
Dim objUsuarios As New ClsSisUsuarios
|
||||
Dim objUsuario As New Usuario
|
||||
|
||||
objUsuario = objUsuarios.ValidaUsuario(Usuario, Encripta(Contraseña), IMEI)
|
||||
objUsuario = objUsuarios.ValidaUsuario(Usuario, Encripta(Contraseña))
|
||||
If objUsuario IsNot Nothing AndAlso objUsuario.TienePermisoProceso(CveProceso) Then
|
||||
CveUsuario = objUsuario.CveUsuario
|
||||
End If
|
||||
|
||||
Reference in New Issue
Block a user