Documentação - Ponto de Entrada AF140GRV

Framework - Linha Protheus LIB
,
1

Bom dia, alguém teria um exemplo ou documentação desse ponto de entrada. Nem a totvs tem isso.

2

Bom dia Flavio, o PE AF140GRV() nao recebe parámetros (pode consultarlo no listado do pontos de entrada no TDN: https://tdn.totvs.com/display/PROT/Pontos+de+Entrada) sendo que é chamado assim:

ExecBlock("AF140GRV",.F.,.F.)

Porém vc pode fazer as alteracoes do registro SN3 no ponto de entrada dentrona transacao, já que é feito el RecLock() previamente:


User Function AF140GRV()

// Traigo centro do custo predeterminado si MV_PAR01 nao foi preenchido
Local cCustEsp := GetMV("XX_ATFCC",.F.,'9999')
Local lCCusDep := GetMv("MV_ATFCCDP",.F.,.F.)

If Empty(MV_PAR01)
   SN3->N3_CCUSTO := cCCustEsp
   If lCCusDep
      SN3->N3_CCDESP := cCCustEsp
   EndIf
EndIf

Return

Espero seja útil.

3

Bom dia, sabe se tem algum ponto de entrada no fonte ATFA140.PRX que posso adicionar mais itens na tela de parâmetros dessa rotina?