Hallo Synus,

falls Du den gleichen Weg regelmäßig gehen mußt, kannst Du Dir auch eine Zwischendatei per DDS erstellen:

A FELD1 8S 0 COLHDG('Feld1')
A SEP01 1 DFT(X'BB') COLHDG(' ')
A FELD2 2S 0 COLHDG('Feld2')
A SEP02 1 DFT(X'BB') COLHDG(' ')
A FELD3 15 COLHDG('Feld3')
A SEP03 1 DFT(X'BB') COLHDG(' ')
A FELD4 8S 0 COLHDG('Feld4')
A SEP04 1 DFT(X'BB') COLHDG(' ')
...

Durch einen CPYF mit *MAP/*DROP werden die Seperatoren gesetzt,
anschließend einfach den CPYTOSTMF mit dieser Zwischendatei ausführen...

Gruß,
Robert