Pesquisa o arquivo de senhas.
A função PswSeek() pesquisa e posiciona o arquivo de senhas conforme a ordem informada na PswOrder() e o parâmetro lUsuario que indica se a pesquisa vai ser feita por usuário ou grupo.
PswSeek( cSeek , [ lUser ] ) → lRetorno
lRetorno → Logical, retorna .T. se a pesquisa foi realizada com sucesso, ou .F. se não encontrou.
| Nome | Tipo | Descrição | Default | Obrigatório | Referência |
| cSeek | Caracter | Informação a ser pesquisada | X | ||
| lUser | Logical | Se for pesquisar usuário informar .T., caso contrário .F. para grupos. | .T. |
#include "protheus.ch"
User Function Sample( )
Local aGrupos
If ( __cUserId == '000000' )
// e usuario administrador.
Else
// Para verificar se faz parte do grupo de administradores
PswOrder(1)
If ( PswSeek(__cUserId, .T.) )
aGrupos := Pswret(1)
If ( Ascan(aUser[1][10],'000000') <> 0 )
// O usuario corrente faz parte do grupo de administradores
EndIf
EndIf
EndIf
Return |
Essa função não observa a configuração de case sensitive que se encontra nas políticas do configurador. Essa configuração é utilizada somente para o login do sistema. |
<style>
div.theme-default .ia-splitter #main {
margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
display: none;
}
#main {
padding-left: 10px;
padding-right: 10px;
overflow-x: hidden;
}
.aui-header-primary .aui-nav, .aui-page-panel {
margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
margin-left: 0px !important;
}
</style>
|