FA050INC - Validação de inclusão no Contas a Pagar

01. DADOS GERAIS

Linha de Produto:	Microsiga Protheus®
Segmento:	Backoffice
Módulo:	Financeiro
Função:	FINA050 - Contas a Pagar

02. DESCRIÇÃO

A finalidade do ponto de entrada FA050INC é permitir validações de usuário na inclusão do Contas a Pagar (FINA050), localizado no TudoOK da rotina.

Em casos onde o Ponto de Entrada é chamado via ExecAuto e retornando .F. (falso), a variável lMsErroAuto deve ser alterada no Ponto de Entrada para .T. (verdadeiro).

Pois caso contrário, causará impacto em integrações e chamadas de ExecAuto onde o processo foi interrompido pelo retorno .F. (falso) do Ponto de Entrada e constando lMsErroAuto também como .F. (falso, ou seja, sem erros).

03. PARÂMETROS

Não se aplica.

04. RETORNO

Tipo	Descrição
Lógico	.T. - valida a inclusão e continua o processo; .F. interrompe o processo.

05. EXEMPLO DE UTILIZAÇÃO

FA050INC

#include 'totvs.ch'

/*/{Protheus.doc} FA050INC()

    A finalidade do ponto de entrada FA050INC é permitir validações de usuário
    na inclusão do Contas a Pagar (FINA050), localizado no TudoOK da rotina.

    @return lRet - lógico, .T. valida a inclusão e continua o processo,
        caso contrário .F. e interrompe o processo.
/*/
User Function FA050INC() as logical
    Local lRet := .F. as logical

    // Validações de usuário

    If !(lRet)
        // Mensagem de Help para esclarescer o motivo de interromper a inclusão
        Help( ,, 'Help',, "Inclusão Interrompida.", 1, 0 )

        // Alterando lMsErroAuto para .T. (verdadeiro), devido aos casos de integrações ou ExecAuto
        lMsErroAuto := .T.
    EndIf

Return lRet

Árvore de páginas