Ich habe das Listing jetzt in ein CL gepackt.
Sieht übersichtlicher aus.
Danach hatte ich zwar das Problem mit Error 3489..
.. Habe das dann aber ins QINTER geschubst. Sieht soweit nicht schlecht aus

Danke
Ronald

hier das CL zum Listen
PHP-Code:
pgm                             
                                
   dcl &Path         *char   255
                                
   rtvdtaara MyDtaara &Path     
                                
   cd &path                     
                                
   ovrdbf stdout MyLib/MyDirFile
   ovrdbf stderr MyLib/MyErrFile
                                
     qsh cmd('ls')              
                                
   dltovr stdout                
   dltovr stderr                
                                
endpgm 
Beide Files wurden vorher mit CRTPF RCDLEN(255) erzeugt