A funçãoValidaEmailrecebe uma string com um endereço de e-mail e faz uma validação básica para verificar se obedece alguns requisitos básicos para ser um endereço de e-mail.
Tipo de Retorno
Boolean
Pacote
A funçãoValidaEmailestá definida dentro do pacote ValidaEmail.pkg.
Sintaxe
Move (ValidaEmail({sEmail})) to {bRet}
Onde:
{sEmail}é o endereço de e-mail que será validado;
{bRet} é a variável que receberá o resultado da função, sendoTruese for considerado válido, eFalse caso contrário.
Exemplo
Abaixo um exemplo de uso da função que verifica se é um e-mail válido:
Function Valida_Email Integer iCampo String sValor Returns Integer
If (Not(ValidaEmail(sValor)) Begin
Error Dferr_Operator “Endereço de e-mail inválido!”
Function_Return 1
End
End_Function // Valida_Email
Set Field_Validate_Msg Field Cliente.Email to Get_Valida_Email