Genau es die Sortierung wird beim Lesen gesetzt.
In RPG würde das ganze wie folgt aussehen:

Code:
Exec Sql Declare c1 Cursor for
        Select * From Tab1
        Order by Rand();

Exec Sql open c1;

Exec Sql fetch c1 Into :tab1ds;
// Hier halt eine Schleife um alle Sätze zu lesen
(Eventuelle Tippfehler vorbehalten. Habs jetzt nicht getestet)