AS400 CL / RPG - ftp Programm

[andreaspr@aon.at]

So hab ich es mal gemacht.
Hoffe das hilft dir etwas weiter.
(Ist nicht perfekt aber fürn start sicher gut genug )

/Free                                                                     
                                                                          
   // Log erstellen                                                       
   Exec SQL Create Table qtemp/Ftp_Output                                 
                  (Feld1 Char (1024) Not Null With Default '');           
   Exec SQL Delete From Ftp_Output;                                       
                                                                          
   // Liste erstellen                                                     
   Exec SQL Create Table qtemp/Ftp_Liste                                  
                  (Feld1 Char (1024) Not Null With Default '',            
                   Feld2 Char (1024) Not Null With Default '',            
                   Status Char (2)   Not Null With Default 'OK');         
   Exec SQL Delete From Ftp_Liste;                                        
                                                                          
   // FTP-Befehle erstellen                                               
   Exec SQL Create Table qtemp/Ftp_Input                                  
                  (Feld1 Char (1024) Not Null With Default '');           
   Exec SQL Delete From Ftp_Input;                                        
                                                                          
   Exec SQL Insert Into Ftp_Input (Feld1) Values ('blalba');
  
/End-Free

             DLTOVR     FILE(*ALL)
             MONMSG     MSGID(CPF0000)

             OVRDBF     FILE(INPUT) TOFILE(FTP_INPUT) MBR(*FIRST)
             OVRDBF     FILE(OUTPUT) TOFILE(FTP_OUTPUT) MBR(*FIRST)
             OVRDBF     FILE(LSOUTPUT) TOFILE(FTP_LISTE) MBR(*FIRST)

             FTP        RMTSYS(&VSYSTEM) PORT(&VPRT) SECCNN(&VSSL)

lg Andreas

[Pikachu]

FTP as batch job

[Josie314]

Danke für die schnelle Rückmeldung,

werde mich mit dem SQL mal ein bisschen vertraut machen, hoffe es hilft mir weiter.
Auf der IBM seite war ich schon, daher habe ich auch das Grundgerüst für das ftp, ist halt alles noch sehr neu für mich und dann hängt es noch an allen Ecken, aber danke schon mal =)

LG Josie

[prsbrc]

Das OpenSource-Api von Herrn Klement könnt hier auch verwendet werden in einem RPG...

Ich für meinen Teil verwende es mittlerweile sehr gerne
da man hier wirklich im RPG schrittweise alles steuern, manipulieren, etc. kann

File Transfer Protocol API