Datenstruktur über Feldgruppe legen / RPG

[Fuerchau]

In RPG ist es leider so, dass Felder insgesamt nur 1x definiert werden (Ausnahme ab V5 mit qualified). Die Felder sind also schon in PARM620 definiert.
Du must deine Pseudo-Struktur in PARM620 als Zeichenfeld definieren (leider mit von-bis) und dann den Overlay.

D PARM620 E DS 256 EXTNAME(FIL620ED)
d STDVDS (von) (bis)
D STDV LIKE(PFST1V) DIM(4) OVERLAY(STDVDS)

Wenn die Struktur PARM620 insgesamt nicht gebraucht wird und die Datei ja in den F-Bestimmungen vorkommt sind die Felder bereits definiert (I-Bestimmung) und du läßt PARM620 weg. STDVDS ist dann so korrekt.

Liegen die Felder in der Struktur nicht direkt hintereinander, wirds etwas komplizierter.

[Rincewind]

Hallo ihr beiden,

Vielen Dank für die Hilfe.

Die Lösung mit dem Pointer ist mir noch zu neu, ich arbeite noch nicht sooo viel mit denen, von daher werde ich mich zunächst der "althergebrachten" Lösung widmen. So habe ich es ohnehin schon gemacht, da das Programm mal wieder schnell-schnell fertig werden musste.

Ich werde mir das mal merken um dies in etwas weniger hektischen Zeiten auszuprobieren.

Vielen Dank

Rince