Dann kommen wir doch mal zur eigentlichen Aufgabe zurück.
Was soll das Programm denn leisten?
Wenn alle Dateien die gleichen Schlüssel haben, warum habe sie dann unterschiedliche Felder?

Mit Native SQL kann man per DESCRIBE TABLE ebenso alle Felder einer Tabelle auslesen um sie dann per Concat zu lesen.
Ich frage mich aber, wass denn mit den Daten danach passieren soll.
Hast du erst mal alles in der Struktur musst du ja doch Feldlängen o.ä. kennen.

Es gibt ja auch einen Umweg :
CPYFRMIMPF: Kopieren ins IFS
CPYFRMSTMF: Kopieren aus IFS in Datei mit genau 1 Feld.