ILE RPG / SQL Füllen einer Feldgruppe

[homue]

Hallo Forum!

Da ich mittlerweile über V5R3 verfüge, konnte ich den Vorschlag von Birgitta testen und er hat funktioniert.

Nur stellt sich mir jetzt ein Problem wenn ich die DS im Programmverlauf anders sortieren will, da es sich bei der DS nicht um ein Array handelt.

Normalerweise habe ich ein Array mit einer DS wie folgt definiert:

D                 DS                                         
D DS_DATEN                            ascend    dim(99)      
D  DA_FARBE                     10    OVERLAY(DS_DATEN:1)    
D  DA_TYP                        1    OVERLAY(DS_DATEN:*NEXT)
D  DA_MENGE                     11  2 OVERLAY(DS_DATEN:*NEXT) 

Hier kann ich dann nach den Unterfeldern sortieren.
Da mein SQL sehr umfangreich ist, soll nicht für jede neue Sortierung das SQL neu ausgeführt werden.
Wie kann ich mein Dilemma lösen? Hat jemand einen Vorschlag?

Gruß Homue

[Fuerchau]

D DSArray DS dim(100)
D MyFld 10A

d MyPtr s * inz(DSArray(1))
D DS based(MyPtr)
D DS_DATEN ascend dim(99)