Hallo Martin,

über Umwege kannst du das machen

zB. so

CL-Aufrufen
CPYFSRC MUSTER --> MUSTER1
ILE PGM aufrufen
F QDDSSRC
C WRITE MUSTER1 (ACHTUNG: Auf Satzaufbau einer DDS Quelle achten SRCSEQ 6,2 SRCDAT 6,0 SRCDTA 80)

CL-Zurück
CPYSRCF --> NAME

So sollte der Grobaufbau deines Programmes sein.