Re: Get in FTPAPI succeeds but file is empty

[Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>]

Thomas,

Not sure if you know this, but FTPAPI is a completely different code 
base than the IBM FTP client.  It does not use the IBM client at all... 
it's an entirely different tool.  (Some people think it's just feeding 
'batch' commands to the IBM client, but it is not.)

This is important to understand, because FTPAPI does not have the same 
'quirks' as the IBM client.  It has it's own, different quirks :-)

Anyway, you can't do something like 'upisavf (replace' in FTPAPI.  That 
is an IBM quirk... :-)   (I've never seen another FTP client that 
requires you to append '(replace' like that besides the IBM one.)

Your 'WhereToPut' should be something like:
'/QSYS.LIB/YOURLIB.LIB/UPISAVF.SAVF'


FTPAPI only supports IFS filename notation, like that...

-SK


On 2/25/2014 3:17 PM, Thomas Garvey wrote:
> Yes, by manually I mean using the IBM FTP client on the same IBM i where
> I am using FTPAPI.
>
> Here are the FTPAPI commands I'm sending...
>
> ftp_logging(ftp: *on);
>
> ftp = ftp_conn('ftpsite.com' : 'username' : 'password' );
>
> DirToUse = 'ftpsite.com/downloads/Spec-Directory/ ';
> if ftp_chdir(ftp: DirToUse ) < 0;
>     Msg = ftp_errorMsg(ftp);
>     ftp_quit(ftp);
>     *InLR = *on;
>     return;
> endif;
>
> ftp_binaryMode(ftp: *on);
>
> FileToGet = 'SPECFILE68.bin';
> WhereToPut = 'upisavf   (replace' ;
> if ftp_get(ftp: FileToGet : WhereToPut  ) < 0;
>     Msg = ftp_errorMsg(ftp);
>     ftp_quit(ftp);
>     *inlr = *on;
>     return;
> endif;
>
> ftp_quit(ftp);
>
>
> Here's the commands from the log...
> 0: FTPAPI version 2.3 released on 2010-05-27
> 0: 220 ProFTPD 1.3.3g Server (Main FTP Server) [71.18.107.138]
> 0: > USER username
> 0: 331 Password required for username
> 0: > PASS **********
> 0: 230 User username logged in
> 0: > CWD ftpsite.com/downloads/Spec-Directory/
> 0: 250 CWD command successful
> 0: > TYPE I
> 0: 200 Type set to I
> 0: > PORT 192,168,0,5,50,144
> 0: 200 PORT command successful
> 0: > RETR SPECFILE68.bin
> 0: 150 Opening BINARY mode data connection for SPECFILE68.bin (15434496
> bytes)
> 0: 226 Transfer complete
> 0: > QUIT
> 0: 221 Goodbye.
>
> The only thing I see different between the 'manual' method and the log
> from FTPAPI is I don't see a message about PASV mode being entered.  I'm
> ignorant of what that might mean, or if it's pertinent.
>
> Thanks for any advice, Scott.
>
> Thomas Garvey
>
>
> On 2/25/2014 2:53 PM, Scott Klement wrote:
> > When you say "doing this manually", I assume you mean that you're using
> > the IBM FTP client instead of FTPAPI.
> >
> > Can you tell me how to reproduce the problem?
> >
> >
> > On 2/25/2014 2:45 PM, Thomas Garvey wrote:
> > > Hi,
> > >
> > > Using Scott Klement's FTPAPI Service program I am downloading a file
> > > from an ftp site to a save file on our IBM i system.  The GET command
> > > succeeds but the receiving save file is empty.
> > > When I do the steps manually, it works.  When issued as procedure calls
> > > using FTPAPI the file is empty.
> > >
> > > What am I missing?
> > >
> > >
> > > (Yes, I use the binary command and the (replace on the get command).
> > >
> > > Any ideas?
> > >
> > > Thomas Garvey