Linha Microsiga Protheus

Árvore de páginas


01. DADOS GERAIS

Produto:

TOTVS RH

Linha de Produto:

Linha Protheus

Segmento:

RH

Módulo:

TOTVS RH (Linha Protheus) - Gestão de Pessoas (SIGAGPE)

Função:GP265VALPE.PRW
País:Brasil
Ticket:23175210
Requisito/Story/Issue (informe o requisito relacionado) :DRHROTPRT-22057


02. DESCRIÇÃO

O ponto de entrada GP265VALPE permite que sejam realizadas validações acerca do cadastro do Contribuinte Individual antes que o registro seja gravado., impedindo a gravação do registro (seja inclusão ou alteração) dependendo do retorno do ponto de entrada.

Rotina:

gpea265 - Cadastro de Contrato Individual

Parâmetros:

Não possui.

Retorno:

Tipo

Descrição

Lógico

Indica se deverá ou não prosseguir com a gravação do cadastro.



03. DEMAIS INFORMAÇÕES

Exemplo de utilização

Vamos imaginar o seguinte cenário:

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.

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 utilizar o ponto de entrada da seguinte maneira:

GP265VALPE
#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 o campo E-mail Principal nao devera ser preenchido."))
        lRet    := .F.
    EndIf

Return lRet



04. ASSUNTOS RELACIONADOS

  • N/A