Pegar valor de um registro antes e depois da alteração

Framework - Linha Protheus LIB
1

Boa tarde !

Estou usando o PE A200BOK para enviar workflow, informando alterações na estrutura. Gostaria de pegar o valor antes de depois da alteração.

Alguém sabe se é possível via Advpl, de forma nativa, pegar o valor do registro antes e depois da alteração ?

Grato.

2

Peguei o exemplo abaixo no site Terminal de Informação do Atilio, veja se te ajuda

aCampos := SUATAB->(DbStruct())

For nAtual := 1 To Len(aCampos)

If &("SUATAB->"+aCampos[nAtual]) != &("M->"+aCampos[nAtual]) Alert("Teve alteração no campo " + aCampos[nAtual) EndIf Next

3

tem esse outro → https://terminaldeinformacao.com/2015/10/23/criacao-de-log-customizado-no-protheus/

4

Obrigado Breno Nogueira. Preciso tentar.
O valor que está gravado no banco eu consigo via aRegs := PARAMIXB[1].
Não consigo recuperar o novo valor, acredito que deveria estar em uma variável de memoria: M->G1_COD OU SG1->G1_COD.
Porém retorna um valor diferente do que estou alterando.

5

estou com a mesma dúvida no mesmo ponto. ele não pega o registo em memória, a ideia de gravar o log achei interessante