Einlesen Dateien vom IFS/root

[elmar]

Servus,

Ich möchte Dateien (STMF-Format) mit einem CL-Programm aus einem fixen Verzeichnis in eine Datenbank einlesen.
Der Dateiname auf dem root ist vorher nicht bekannt, nur das Verzeichnis.

Meine momentane Lösung: einen DSPLNK mit *PRINT schreiben, die Spoóldatei lesen, Dateinamen daraus holen, Spool löschen.

Weiss da jemand was "eleganteres" ?

danke für tips

[Bruno Jakob]

Hallo Elmar,

hast du schon CPYFRMIMPF probiert?

Gruß
Bruno

Holla, da habe ich was falsch verstanden.
Eine Möglichkeit:
1. Arbeitsdatei erstellen

2. in QSH den Befehl
ls > /qsys.lib/mylib.lib/arbeitsdatei.file/arbeitsdatei.mbr

3. Inhalt der Datei auslesen

oder auch die entsprechenden Unix-API opendir und readdir verwenden (müsste auch mit Cobol und RPG gehen, in C könnte ich ein Beispiel liefern).




[Dieser Beitrag wurde von Bruno Jakob am 19. Mai 2003 editiert.]