| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Backoffice |
| Módulo: | Financeiro |
| Função: | FINA050 - Contas a Pagar |
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). |
Não se aplica.
Tipo | Descrição |
| Lógico | .T. - valida a inclusão e continua o processo; .F. interrompe o processo. |
#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 |