Emulating SQL "SELECT DISTINCT" with LF?

Hello,

is it possible with the facilities available through logical files to have some flavour of READ of that particular LF return the next record with a non-equal key? Like the opposite of READE, maybe?

Or must I solve that programmatically (roughly):
SETLL to *LOVAL,
Loop:
READE until EOF,
READ
if EOF, continue
goto Loop.

Also, I dimly remember there were some "group facilities" available with the good old RPG cycle (which even I want to omit). I can't recall to have read about something helpful in the RPGLE Docs.

:wq! PoC

PGP-Key: DDD3 4ABF 6413 38DE - https://www.pocnet.net/poc-key.asc