Neue Zeilen in Quellendatei per Programm

[Robi]

input und output

lies die quelle und gib alles was du nicht brauchst nach output aus.
versorge den Zähler / das Source Datum (Stelle 1 - 12 ) selber.

Dann schreibst du deine Inhalte, und zum schluß den Rest.

Robi
(der RPG Generatoren sein 15 Jahren so schreibt)

da waren andere mal wieder schneller

[RobertMack]

1) CRTSRCPF FILE(QTEMP/QWRKSRC) ACCPTH(*KEYED)

2) CPYSRCF FROMFILE(MYLIB/QRPGSRC) TOFILE(QTEMP/QWRKSRC)
FROMMBR(MYPROGRAM) SRCOPT(*SEQNBR) SRCSEQ(1.00 1.00)

3) jetzt kann Dein Tool bis zu .99 Zeilen hinter jeder gelesenen Anweisung in QWRKSRC einfügen

4) Ergebnis nach Prüfung aus QWRKSRC zurück nach QRPGSRC