Estou tentando fazer um Grid onde um dos campos precisa consultar a tabela de produtos, porém o mesmo não está funcionando, acho que me deu um branco ou então fiz alguma coisa errada sem perceber... alguém poderia dar um help?
//Aadd(aHeader,{ titulo , campo , picture , tam , dec , valid, usado, tipo, F3 , context, visual, relacao , when } )
Aadd( aHeader, { "Código" , "PRODUTO", PesqPict("SB1","B1_COD"), TamSX3("SB1","B1_COD")[1], TamSX3("SB1","B1_COD")[2], "" , "" , "C" , "SB1" , "V" , "" , "" , "" } )
aAlters:= { "PRODUTO" }
_nPosProd := aScan(aHeader,{ |x| UPPER(ALLTRIM(x[2])) == "PRODUTO"})
...
DEFINE MSDIALOG _oDlg1 FROM 089,230 TO 504,841 TITLE OemToAnsi(cCadastro) PIXEL
...
oGetd1 := MsGetDados():New(020,002,162,295,nOpc,cLinOk,cTudOk,,.T.,aAlters,1,,_nTotLin,,,,,_oDlg1)
Fórum