Perguntas TGet():New no Protheus 12 não está Funcionando

Boa tarde a todos,

Tenho uma customização que roda certinho na versão 11, porém na 12 parou de funcionar.
A Linha é a seguinte:

oGet1 := TGet():New( 028,076,bSetGet(_cProd),oDlg1,060,008,'@!',{||If(PCount()>0,U_XVERIF(_cProd,1),"")},CLR_BLACK,CLR_WHITE,,,,.T.,"",,,.F.,.F.,,.F.,.F.,"SB1","_cProd",,)

Em XVERIF, ele faz a verificação do código do Produto e retorna a descrição e o saldo do mesmo.

Obrigado

Mas ele apresenta algum erro?
Qual a mensagem?

Bom dia,

Não apresenta erro não, só não entrava na rotina XVERIF.
Mas já consegui resolver.

Obrigado

Boa noite, estou com esse mesmo problema, como você resolveu?

Bom dia Rodolfo,

Segue o comando anterior e o atual pra vc comparar:

//oGet1 := TGet():New( 028,076,bSetGet(_cProd),oDlg1,060,008,'@!',{||If(PCount()>0,U_XVERIF(_cProd,1),"")},CLR_BLACK,CLR_WHITE,,,,.T.,"",,,.F.,.F.,,.F.,.F.,"SB1","_cProd",,)

oGet1 := TGet():New( 028,076,{ |u| If( PCount() == 0,_cProd,_cProd := u ) },oDlg1,060,008,'@!',{|| U_XVERIF(_cProd,1)},CLR_BLACK,CLR_WHITE,,,,.T.,"",,,.F.,.F.,,.F.,.F.,"SB1","_cProd",,)

A função foi alterada pela TOTVS, foi tirado o bSetGet por exemplo.


Abraço

Valeu Claudinei, deu certo.

Obrigado.