AUDLOG

PE generico pra log de auditoria custom. Geralmente em PEs de gravacao de tabelas Z.

Assinatura: User Function AUDLOG() --> NIL

Retorna: NIL

Modulo: Custom · Rotina: Diversas · Momento: Auditoria custom

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

Exemplo

Static Function _GravaAud(cTabela, cCampo, xValAnt, xValNov)
    RecLock("ZAUD", .T.)
    ZAUD->ZAUD_FILIAL  := xFilial("ZAUD")
    ZAUD->ZAUD_DATA    := dDataBase
    ZAUD->ZAUD_HORA    := Time()
    ZAUD->ZAUD_USER    := RetCodUsr()
    ZAUD->ZAUD_TABELA  := cTabela
    ZAUD->ZAUD_CAMPO   := cCampo
    ZAUD->ZAUD_VALANT  := cValToChar(xValAnt)
    ZAUD->ZAUD_VALNOV  := cValToChar(xValNov)
    ZAUD->(MsUnlock())
Return

Pegadinhas

Pra LGPD, considerar mascarar dados PII no log.

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 StartJob pra background.
Em JOB sem AppServer ativo: PE chamado via RPC pode ter cFilAnt/cEmpAnt vazios — sempre garanta RpcSetEnv.
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 FwLogger com identificacao do PE no log — facilita troubleshooting.