Histórico da Página

...

Retorno:

03. DEMAIS INFORMAÇÕES

Exemplo de utilização

...

Cliente possui a necessidade que todo Contribuinte Individual não possua o email informado devido a outros controles internos para envio de recibo entre outros por email, especificamente para contribuintes individuais.

O campo E-mail Princ. (RA_EMAIL) por padrão não é um campo de preenchimento obrigatório e que não possui validações específicas quanto ao seu preenchimento, sendo assim, é possível utilziar utilizar o ponto de entrada da seguinte maneira:

#INCLUDE "Protheus.CH"

User Function GP265VALPE()
Local lRet  := .T.

    // Caso o Contribuinte Individual está sendo incluído com E-mail Principal ou alterado com o E-mail Principal
    If  !Empty(Alltrim(M->RA_EMAIL)) .And. SRA->RA_EMAIL <> M->RA_EMAIL
        MsgInfo(Oemtoansi("Para contribuintes individuais é necessário preencher o campo E-mail Principal nao devera ser preenchido."))
        lRet    := .F.
    EndIf

Return lRet

...