F100GRV
PE durante gravacao de compensacao de titulos (FINA100). Permite logica custom no momento da compensacao.
Assinatura: User Function F100GRV() --> NIL
Retorna: NIL
Modulo: SIGAFIN · Rotina: FINA100 · Momento: Pre-commit da compensacao
Parametros (PARAMIXB)
Este PE nao recebe parametros via PARAMIXB. A tabela alvo ja esta posicionada quando o PE dispara — opere via (ALIAS)->CAMPO.
Retorno
NIL
Pegadinhas
- Compensacao envolve NCC + SE1 — pode disparar PE 2 vezes.
Quando usar
- Ajuste de campos calculados antes do commit
- Validacao final consolidada (regras que envolvem multiplos campos)
- Override de valores default
Exemplo (template)
User Function F100GRV()
// Operacao ja gravada — trigger pra acoes pos-evento
Begin Sequence
// Logica custom apos gravacao
// Exemplos: notificar, sincronizar, gerar log
FwLogger():Info("F100GRV disparado", {;
"filial": cFilAnt, ;
"user": RetCodUsr() ;
})
Recover
FwLogger():Error("Falha em F100GRV: " + ErrorBlock())
End Sequence
ReturnCuidados gerais
- Idempotencia: PEs podem disparar mais de uma vez em retry ou reprocessamento — codigo deve ser seguro pra rodar varias vezes sem efeito colateral.
- Performance critica: PE roda em fluxo do usuario. Operacoes pesadas (loop sobre milhares de registros, chamada HTTP sincrona) podem travar a tela. Use
StartJobpra background. - Em JOB sem AppServer ativo: PE chamado via RPC pode ter
cFilAnt/cEmpAntvazios — sempre garantaRpcSetEnv. - Begin Sequence + Recover: erros nao tratados em PE podem deixar transacao Protheus em estado inconsistente. Sempre envolver em
Begin Sequence ... End Sequence. - Logging com contexto: use
FwLoggercom identificacao do PE no log — facilita troubleshooting.
Tabelas afetadas
- SE1 — compensacao de titulos (geralmente posicionada quando PE dispara)
- Relacionadas: SE2, SE5