ContaExpirada

Esta função retorna se uma conta de usuário está expirada ou não.

Sintaxe: ContaExpirada(Numero CodUsu);

Parâmetros:

Nome	Tipo	Descrição
CodUsu	Numérico	Código da conta de usuário.

Tipo de retorno: Retorna cVerdadeiro ou cFalso.

Exemplo:

/* Testa o item da tela de entrada "Conta Expirada (EUsuExp)" */

Definir Alfa eUsuExp;

Se ((eUsuExp <> "A") e (R910ENT.TIPENT = 'U'))

Inicio

xCODENT = R910ENT.CODENT;

xConExp = ContaExpirada(xCodEnt);

Se ((eUsuExp = "S") e (xConExp = cFalso))

Cancel(3);

Senao

Se ((eUsuExp = "N") e (xConExp = cVerdadeiro))

Cancel(3);

Fim;

Utilização: Gerador de Relatórios e Regras.

Disponível para os módulos: Todos os módulos do Gestão de Pessoas | HCM.