Descrição:

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.


Sintaxe:

PswSeek( cSeek , [ lUser ] ) → lRetorno


Retorno:

lRetorno → Logical, retorna .T. se a pesquisa foi realizada com sucesso, ou .F. se não encontrou.


Parâmetros:

NomeTipoDescriçãoDefaultObrigatórioReferência
cSeekCaracterInformação a ser pesquisada
X
lUserLogicalSe for pesquisar usuário informar .T., caso contrário .F. para grupos..T.


Exemplo:

#include "protheus.ch"

User Function Sample()
Local aGrupos as array

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>