Feldruppen in ILE-RPG

[tmg]

Hallo zusammen,

nach einigen Jahren ohne einen Strich programmiert zu haben komme ich nun doch wieder in die Verlegenheit "schnell" was zu programmieren.

Ich hab eine Datei mit 120 Feldern:
BDB001 - BDB0120

Diese Felder möchte ich auf Inhalt prüfen und dann je nach Inhalt in eine andere Datei stellen. Ich will aber nicht 120 mal
BDB001 IFGT 0 Endif
usw.

Das ging doch irgendwie mit Feldgruppen,
so BDB,XX

Aber ich hab völlig vergessen, wie ich die Feldgruppen definiere, befülle oder sonst irgendwie verwurschte.

Für einen kurzen Klaps auf den Hinterkopf wäre ich dankbar.

Thomas

[Fuerchau]

D MYFILE E DS
D FROM TO Np M BDB DIM(120)

Mit From/To musst du die Feldpositionen ggf. per DSPFFD ermitteln.

PS:
Hört sich irgendwie nach BrainXPPS (Bedarfsdatei) an.

[tmg]

Jaaa, genau die ist es, schon mal damit gearbeitet?

Thomas

[Fuerchau]

Klar, ich bin sozusagen XPPS-Spezialist (allerdings nur bis 1.6).

Wenn du die Quellen eines aktuellen Programmes dass die Bedarfsdatei verarbeitet mal per CVTRPGSRC in ILE übersetzt (incl. Copy) kannst du diese Definitionen ja übernehmen.