Perguntas Manipular campo no Pedido de Compra

Boa Tarde Pessoal

Eu utilizei o ponto de entrada MT120TEL e criei um campo customizado...até blz...ta funcionando..
Porém não consegui fazer o conteudo desse campo ser gravado nos itens do pedido de compra e nem que fosse gravado no campo que criei na SC7.

Utilizei o ponto de entrada MT120GRV, mas não funcionou...

Alguem teria algum exemplo ou ideia para me ajudar

Boa Tarde Luiz

Eu acabei de resolver o problema....segue a solução se alguem precisar.

//

---

Cria o campo no cabeçalho

---

#include "rwmake.ch"
#include "protheus.ch"
User Function MT120TEL()
Local oNewDialog := PARAMIXB[1]
Local aPosGet := PARAMIXB[2]
Local aObj := PARAMIXB[3]
Local nOpcx := PARAMIXB[4]
Public _cLote := If(Inclui,Space(6),SC7->C7_ZLOTE)

@ 032,aPosGet[2,5]-12 SAY "Lote" OF oNewDialog PIXEL SIZE 060,006
oLote := TGet():New(031,aPosGet[2,6]-25,{|u| If(PCount()>0,_cLote:=u,_cLote)},oNewDialog,020,006,PesqPict('SC7','C7_ZLOTE'),,0,,,.F.,,.T.,,.F.,,.F.,.F.,,IIF(nOpcx = 2,.T.,.F.),.F.,"","_cLote",,,, )
Return(.T.)

//

---

Atualiza o campo customizado em todos os itens

---

#include "rwmake.ch"
#Include 'Protheus.ch'
User Function MTA120G2()
**********************
Local lRet:= .T.
Local cFunc := FunName()

IF cFunc$"MATA121"
SC7->C7_ZLOTE := _cLote
EndIf

Return lRet


Obrigado...