Cross Segmento - TOTVS Backoffice Linha Protheus - ADVPL - Variável de Memoria não disponível ao Utilizar a RunTrigger na rotina Pedido de Venda.

Tempo aproximado para leitura: 00:02:00 min

Dúvida
Ao utilizar a função RunTrigger no Pedido de Venda, não está disponível o valor de memória porém está preenchido o campo, como pegar esta informação?

Ambiente
Cross Segmento - TOTVS Backoffice (Linha Protheus)  – ADVPL – A partir da versão 11.80

Solução
Para pegar o valor neste caso é necessário buscar o valor no Acols.

Exemplo

#include 'protheus.ch'
#include 'parmtype.ch'

//função do gatilho do campo C6_TES
user function C6TES()
 
LOCAL nTESatu := M->C6_TES
Local nTes := aScan(aHeader,{|x| Trim(x[2])=="C6_TES"} )


IF nTESatu == nil
 nTESatu := aCols[n][nTes]
ENDIF

if (nTESatu == '520')

nTESatu := '501'
 
else

nTESatu := '520'
 
endif

return nTESatu

//Função de gatilho chamando a Runtrigger.
user function C6PROD()
 
LOCAL nProduto := M->C6_PRODUTO

If ExistTrigger('C6_TES') 
 RunTrigger(2,n,nil,,'C6_TES')
Endif

return nProduto

 Saiba Mais

Runtrigger

Gatilhos