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?