import.css=/download/attachments/327912/newLayout.css |
Função: PswSeek - Pesquisa o arquivo de senhas
Descrição: 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. Programa Fonte: SIGAPSW.PRW Sintaxe: PswSeek - Pesquisa o arquivo de senhas ( cSeek [ lUser ] ) --> lRetorno Retorno: lRetorno
Exemplos #include "protheus.ch"User Function Sample( )Local aGruposIf ( __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 EndIfEndIfReturn Parâmetros:
|