Daten aus verschieden Dateien in Feld schieben

[Kaufmann]

Ich habe ein umfangreiches Löschprogramm erstellt. Dieses geht auf ca. 50 Dateien los und löscht daraus nach bestimmten Vorgaben Sätze. Um dieses Programm zu testen brauche ich eine Möglichkeit Sätze aus unterschiedlichen Dateien, mit unterschiedlichen Aufbau, in ein langes Feld zu übertragen. Dieses soll dann anschliessend als Protokoll gespeichert werden.

Kann mir wer auf die Sprünge helfen???

[KingofKning]

Von welcher Programmiersprache sprichst Du denn?

In Cobol ist das ja nun einfach.

In RPG keine Ahnung

GG

[Fuerchau]

Das geht nur über einen Umweg:

Je Datei einen CPYTOIMPF in eine IFS-Datei mit anhängen, anschließend einen CPYFRMSTMF von IFS in eine PF.
Ggf. kann man auch direkt in eine PF mit Pfad /QSYS.LIB/MYLIB.LIB/MYFILE.FILE/MYFILE.MBR vom CPYTOIMPF ausgeben, was zu probieren bleibt.

Ansonsten ist halt Handarbeit nötig.

In COBOL ist das auch nicht einfacher, wenn gepackte und Datumsfelder vorhanden sind. Der Move einer Feldgruppe ist da nicht hilfreich.