Doch, das klappt - wenn Du Dir eine Arbeitsdatei zwischenschaltest:

1) CRTSRCPF FILE(QTEMP/QWRKSRC) ACCPTH(*KEYED)
2) CPYSRCF FROMFILE(MYLIB/QRPGLESRC) TOFILE(QTEMP/QWRKSRC) FROMMBR(MYMBR) SRCSEQ(1.00 1.00)
3) Maschinelle Änderungen in QTEMP/QWRKSRC
4) Anschliessend zurück nach QRPGLESRC kopieren