* Seleciona a dívida mais antiga de cada cliente Select Codigo, Cliente, Min(Vencimento) ; From SuaTabela Group By Codigo, Cliente Into Cursor SeuCursor * Pega os dados completos da dívida mais antiga SELECT A.* From SuaTabela As A, SeuCursor As B ; WHERE A.Codigo = B.Codigo And A.Cliente = B.Cliente ; ORDER BY Cliente, VencimentoAté mais.