
Zitat von
philsturm
Jetzt müsste ich die Felder ja als zusammenhängendes "Element" in das Array schreiben. Wie mache ich das bei unterschiedlichen Datentypen?
Musst Du nicht! Da Feld1 und Feld2 ebenfalls Feldgruppen sind:
Code:
D MyDS DS Qualified
D MyArray Dim(10)
D Feld1 10A Overlay(MyArray)
D Feld2 10I 0 Overlay(MyArray: *Next)
/Free
MyDS.Feld1(1) = 'XYZ';
MyDS.Feld1(2) = 'AAA';
MyDS.Feld2(1) = 'XXX';
MyDS.Feld2(2) = %Int(MyDS.Feld1(7));
/End-Free
Übrigens MyArray ist allein durch die Überlagerung definiert, d.h. es ist keine weitere Definition (wie Längenangabe oder Datentyp) notwendig
@Baldur
Glaubst Du, Du bist das einzige arme Schweinchen?
Ich muss noch alles auf V5R2 runterwandeln ... und bevor der letzte unserer Kunden nicht von V5R2 weg ist, passiert da auch nichts weiter.
Birgitta
Bookmarks