Free-RPG I Bestimmung ersetzen

[K_Tippi]

Hallo Gemeinde,
ich versuche gerade ein älteres PGM auf free umzustellen.

hier mein Problemchen: bisher wurde innerhalb einer Datei ein Feld über eine I-Bestimmung umbenannt.

I §DATEI
I §Feld Neufeld

Später wurde dann §Datei und §Feld durch einen Automatismus durch die Richtigen Feldnamen ersetzt bevor umgewandelt wurde.

Wer hat einen Tipp wie ich das am besten ersetzen kann.
Danke
Klaus

[B.Hauser]

Handelt es sich nur um ein einziges Feld oder sollen alle Felder umbenannt werden, z.B. ein Präfix davor gesetzt werden oder Zeichen einfach ersetzt werden.
In diesem Fall könnte dann mit dem Schlüssel-Wort PREFIX in den F-Bestimmungen oder bei einer (externen) Datenstruktur in den D-Bestimmungen gearbeitet werden ... oder aber auch mit einer qualifizierten Datenstruktur (das Programm müsste dann natürlich überarbeitet werden).

Wenn nur ein einzelnes (oder einige wenige Felder) umgenannt werden sollen, definiert man am Besten eine unqualifizierte Datenstruktur. Innerhalb der Datenstruktur kann man dann die Umbenennungen vornehmen:


DCL-DS YourExtDS ExtName('YOURFILE');
NewNameA ExtFld('ORIGFLD1');
NewNameB ExtFld('ORIGFLD2');
END-DS;


Birgitta

[K_Tippi]

Hallo Birgitta, es soll tatsächlich nur einf Feld (KEYFELD) umbenannt werden.
ich probierte das über die DS aus.
Danke

[RobertMack]

.... Frage falsch verstanden ...