AGRA040
PE em Operacao Agricola (AGRA040). Trigger pra atualizacao de estoque por talhao.
Assinatura: User Function AGRA040() --> NIL
Retorna: NIL
Modulo: SIGAGAA (Agro) · Rotina: AGRA040 · Momento: Apos operacao agricola
Parametros (PARAMIXB)
// NJF (operacao) posicionadaRetorno
NIL
Contexto
SIGAGAA controla operacoes agricolas — plantio, pulverizacao, colheita por talhao/safra.
Exemplo
User Function AGRA040()
// Operacao em chuva = registrar incidencia
If NJF->NJF_TIPOPE == "PULVER" .And. NJF->NJF_CONDIC == "CHUVA"
U_NotifSupervisor("Pulverizacao em chuva - talhao " + NJF->NJF_TALHAO)
EndIf
ReturnPegadinhas
- Operacao gera SD3 de baixa (insumos) — confirmar saldo.
- Multiculturas — uma operacao pode afetar varios talhoes.
- Em ambiente integrado com TOTVS Agro Multicultivo, sincronizar com mobile.
Quando usar
- Customizacao da rotina padrao Protheus
Cuidados 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
- NJF — operacao agricola (geralmente posicionada quando PE dispara)
- Relacionadas: SD3, NJM