Anmelden

View Full Version : Dateiverarbeitung



HPKahn
30-05-05, 13:08
Hallo zusammen,

ich möchte eine kleines CL-Programm schreiben, das folgendes macht:

- Prüfe ob eine bestimmte Datei(CSV-Format) in einem Verzeichnis vorhanden ist
wenn ja, dann wenn nein weitere Überprüfung
- Import in eine Tabelle (CPYFRMIMPF, funktioniert schon)
- Nach Import CSV-Datei löschen.

Das ganze soll permanant laufen, d.h laufende Überprüfung auf Vorhanden sein der Datei.

Wie kann ich das anstellen?

Vielen Dank im voraus

Grüße HP Kahn

Fuerchau
30-05-05, 13:21
Am einfachsten mit der QShell:

CRTPF MYLIB/QSHOUT RCDLEN(256) /* Ausgabe für QSH einmalig */

QSH CMD('ls /pfad/* >/qsys.lib/mylib.lib/qshout.file/qshout.mbr 2>/dev/null')

In der Datei QSHOUT stehen dann die vorhandenen IFS-Dateien, falls keine da sind, ist die Datei leer.