Caro Fernando,
Eu vou supor que você tenha em seu arquivo os seguintes campos:
a) Campo ItnDats (Data da Venda)
b) Campo ItnCods (Código do Ítem)
c) Campo ItnVals (Valor do Ítem Vendido)
d) Campo ItnClis (Código do Cliente)
e que tenha pelo menos estas duas variáveis alimentadas :
a) lcMinhaVariavelComItemQueQueroValor (Código do Ítem)
b) lcMinhaVariavelComClienteQueProcuro (Código do Cliente
Faça então a seguinte Select :
Select Max(a.ItnDats) as ItnDats, a.ItnCods, a.ItnVals, a.ItnCLis ;
From MeuArquivodeItens a ;
Where a.ItnCods = lcMinhaVariavelComItemQueQueroValor And ;
a.ItnClis = lcMinhaVariavelComClienteQueProcuro ;
Into Cursor csMeuCursorComoResultado
Ps.: Caso não seja exatamente este seu ambiente, entre em contato com um pouco mais de informação e eu tentarei ajuda-lo.
Um abraço fraterno,
Richard Diegues
richarddiegues@msn.com
richarddiegues@ig.com.br