Último registro for each !!

Saudações...
Com break by ou query seria o mais indicado.

O ideal seria utilizar um indice da tabela e dar um find last.
Mas caso não for possivel usa indice pode fazer desse jeito tb...

Código:

&scoped-define tabela nomedatabela
def var id as recid.

for each {&tabela} no-lock where ...:
  id = recid({&tabela}).
end.

find {&tabela} where recid({&tabela}) = id no-lock no-error.
if avail {&tabela} then disp {&tabela}.

Bom dia!

Você pode também fazer um FOR EACH e depois do DISPLAY acrescente um PAUSE(0)., assim ele vai para a ultima linha da tabela.

Também pode fazer um FIND LAST na tabela e mostrar o registro com um DISPLAY.

Espero ter ajudado!