Re: Emulating SQL "SELECT DISTINCT" with LF?

[Jeff Crosby <jlcrosby@xxxxxxxxxxxxxxxx>]

You mean like SETGT opcode?

On Fri, Jun 26, 2020 at 7:52 AM Patrik Schindler <poc@xxxxxxxxxx> wrote:

> 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
>
>
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/midrange-l.
>
> Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
> questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate
> link: https://amazon.midrange.com