Moin zusammen !

Ich versuche gerade in einem RPG Programm ein FTP abzusetzen (Aufruf QCMDEX mit den jeweiligen Befehlen (hier Modulaufruf CLCMD)).

Nur allerdings hab ich das mit den Input-Dateien und Output-Dateien noch nicht wirklich kapiert und die OVRDBF funktionieren nicht....

Hier mal mein Quellcode:

Code:
FINPUT     O    E             DISK    USROPN RENAME(QFTPCMD:INPUT00) 
FOUTPUT    IF   E             DISK    USROPN RENAME(QFTPCMD:OUTPUT00)
 *
C                   CALLP     CLCMD('CRTDUPOBJ OBJ(QFTPCMD) ' +        
C                              'FROMLIB(*LIBL) OBJTYPE(*FILE) ' +      
C                              'TOLIB(QTEMP)')                         
C                   CALLP     CLCMD('CLRPFM FILE(QFTPCMD) MBR(OUTPUT)')
C                   CALLP     CLCMD('CLRPFM FILE(QFTPCMD) MBR(INPUT)') 
C                   CALLP     CLCMD('OVRDBF FILE(INPUT) ' +            
C                              'TOFILE(*LIBL/QFTPCMD) MBR(INPUT) ' +   
C                              'OVRSCOPE(*JOB)')                       
C                   CALLP     CLCMD('OVRDBF FILE(OUTPUT) ' +           
C                              'TOFILE(*LIBL/QFTPCMD) MBR(OUTPUT) ' +  
C                              'OVRSCOPE(*JOB)')                     
C*                                                                   
C*   Befehlsfolge für Eingabedatei FTP 
C                   OPEN      INPUT                                  
 **** Datei mit Commandos schreiben ****
.....
 *         FTP Absetzen
C         CALLP     CLCMD('FTP ' +  RMTSYS)                 
 
usw....
Datei Input:
Code:
 A*-----------------------------
 A          R QFTPCMD           
 A            SRCDTA        80
Datei Output:
Code:
A          R QFTPCMD           
A            SRCDTA        80
Datei QFTPCMD:
Code:
                R QFTPCMD                
                  TEXT2        256       
                  TEXT3        256
Die Output-Datei möchte ich später auslesen um Fehler zu analysieren ...
Ich weiß nicht weiter... vielleicht kann mir jemand auf die Sprünge helfen !

Gruß
Maxx