Mir ist immer noch nicht ganz klar was Du willst.
Vielleicht kannst Du die Datenstruktur, so wie Du Dir sie vorstellst mal im Fix-Format posten.
Hier ist ein Beispiel einer externen Datenstruktur, in der einzelne Felder umbenannt bzw. intialisiert wurden. Zunächst im klassischen und dann im Free-Format-
Code:
D ExtDSOrderHdr...
D E DS ExtName('ORDERHDRX')
D OrdCustNo E ExtFld(CustNo)
D Company E ExtFld('COMPANY') inz(10)
D DelDate E ExtFld(DelDate) inz(*SYS)
DCL-C ConstDelDate Const('DELDATE');
DCL-DS ExtDSOrderHdr EXTNAME('ORDERHDRX');
OrdCustNo ExtFld('CUSTNO');
Company ExtFld('COMPANY') inz(10);
DelDate ExtFLd(ConstDelDate) inz(*SYS);
End-DS;
Ansonsten kann man im Free-Format mit dem Schlüssel-Wort OVERLAY keine kompletten Datenstrukturen (sondern nur Unter-Felder) überlagern, sondern muss mit Hilfe des Schlüssel-Wortes POS die Start-Position angeben.
Birgitta
Bookmarks