Identifica se um usuário Logix está bloqueado para uso do sistema.
Sintaxe
LOGIN_LOGIX_userBlocked( [ < l_user > ], [ < l_displayMode > ] ) => SMALLINT
Parâmetros
Nome | Tipo | Obrigatório? | Descrição |
---|---|---|---|
l_user | CHAR | Sim | Login do usuário. |
l_displayMode | SMALLINT | Sim | No caso de ocorrer algum problema ou identificar que o usuário está bloqueado para uso do sistema, uma mensagem padrão do sistema pode ser exibida ou apenas armazenada em memória: 0 ONLINE Mensagem será exibida em tela. log0030_mensagem_get_texto() e log0030_mensagem_get_tipo() ou exibi-la em tela em um outro momento através da função log0030_exibe_ultima_mensagem(). |
Retorno
Nome | Tipo | Descrição |
---|---|---|
l_return | SMALLINT | TRUE Usuário bloqueado para uso do sistema. FALSE Usuário consta como ativo para uso do sistema. |
Exemplo
#--------------------------------------------# FUNCTION LOGIN_LOGIX_userBlocked_test() #--------------------------------------------# DEFINE l_user LIKE usuarios.usuario #Checagem de bloqueio do usuario ad02847, com controle de exibição de mensagem de erro em modo BATCH (1) IF NOT LOGIN_LOGIX_userBlocked('ad02847',1) THEN CALL LOG_messageInfo("Usuário está ativo no sistema.","","") ELSE CALL log0030_exibe_ultima_mensagem() END IF END FUNCTION
Informações
Fonte: login.4gl