Hallo zusammen,
ich versuche zwei Dateien im IFS zu lesen. Zunächst erstelle ich über die QSHELL ein Inhaltsverzeichnis des Verzeichnisses in eine Datei. Dann öffne ich diese Datei, um alle Dateien des Verzeichnisses zu verarbeiten.
Code:
command = 'ls ''' + %trim(Verzeichnis) + ''' > '+
%trim(lsDateiname);
rc_qzsh = QzshSystem(Command);
lsDatei = fopen(%trim(lsDateiname) : O_RDONLY + O_TEXTDATA);
if lsDatei >= 0;
dow readline(lsDatei: %addr(lsZeile): %size(lsZeile)) >= 0;
DatName = %trim(Verzeichnis) + %trim(lsZeile);
if access(%trim(DatName):F_OK) = 0;
Datei = fopen(%trim(DatName) : O_RDONLY + O_TEXTDATA);
if Datei >= 0;
dow readline(Datei: %addr(Zeile):
%size(Zeile)) >= 0;
Obwohl für Datei und lsDatei unterschiedliche Dateinummern angezeigt werden, liest das Programm zuerst alle Zeilen aus lsDatei und anschließend alle Zeilen aus Datei.
Wie bekomme ich da eine saubere Abgrenzung hin?
Bookmarks