Hallo Mark,

falls Du bereits Release V5R2M0 hast, kannst Du auch eine Datenstruktur als Feldgruppe definieren.

Das Ergebnis ist das gleiche wie mit Occur, hat aber den Vorteil, dass die einzelnen Felder direkt qualifiziert angesprochen werden können.

Bei der Lösung mit OCCUR muss das entsprechende Datenstruktur-Element zunächst mit OpCode OCCUR oder Built-in-Function %Occur eingelesen werden.

Definition:
D Tabelle DS Dim(40) Qualified
D Feld 10A Dim(5)

/Free
Tabelle(35).Feld(3) = 'ABC';
/End-Free

Birgitta