TMSVLFRE - Manipula Valor do Frete

Olá pessoal!

Segue um ponto de entrada muito útil, que manipula o valor do frete de acordo com uma necessidade específica.

Localizado no TMSXFUNB (Calculo do Frete a Pagar)

User Function TMSVLFRE()
Local  cFilOri    := PARAMIXB[1]
Local  cViagem  := PARAMIXB[2]
Local  nValFret := 0

If cFilOri + cViagem == '01001258'   
	nValFret := 1500
EndIf

Return(nValFret)