Perguntas Ponto de entrada MTA105OK

Boa tarde, estou fazendo um aplicação que quando um usuário solicitar ao armazém, seja enviado um email para liberação. Estou usando o ponto de entrada MTA105OK que valida os dados.
Agora como faço para pegar os dados(produto, usuário, quantidade, etc...)?
Obrigado

Bom dia Ronaldo,

tente assim:

User Function MTA105OK
Local _area := getarea()
Local cProduto := aCols[n,aScan(aHeader,{|x| Alltrim(x[2])="CP_PRODUTO"})]
Local lRet := .T.

msgAlert("Produto: "+Acols[n][cProduto])

RestArea(_area)
Return lRet


Att
Thales

Bom dia Thales, o que você me passou funcionou só que agora eu preciso percorrer toda grid para pegar os itens.

Blz,

para percorrer o grid você pode fazer assim:

User Function MTA105OK
Local _area := getarea()
Local cProduto := aCols[n,aScan(aHeader,{|x| Alltrim(x[2])="CP_PRODUTO"})]
Local lRet := .T.

For Nx:=1 To Len(Acols)
msgAlert("Produto: "+Acols[Nx][cProduto]) //aparecerá uma mensagem para cada linha do Acols contendo o respectivo produto
Next Nx

RestArea(_area)
Return lRet

Opa, funcionou perfeitamente...Obrigado

De nada.
Se estiver tudo certo, pode agradecer a minha resposta ali.

Att
Thales