× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



No error messages?  Any hints in the job log?

A wild guess, but doesn't the IP address in the FTP command string need to
be enclosed in single quotes?  I know if I use FTP xxx.xxx.xxx.xxx from a
command line, it'll bomb.  Why not try:

         qCmdCmd = 'FTP RMTSYS(''172.99.99.99'')';

Notice the two single quotes surrounding the IP address.  You probably know
this, but for the sake of clarity, you need to use double single quotes when
you want one single quote to appear in a string you are creating.

Oh, another thing, do an override of the OUTPUT file to a file so you can
interrogate the results of your FTP batch command.  That might give you a
few more hints.

HTH

- Dan Bale
(I am *NOT* "Dale"
http://archive.midrange.com/midrange-l/200105/msg00281.html )
SAMSA, Inc.
989-790-0507
DBale@SAMSA.com <mailto:DBale@SAMSA.com>
  Quiquid latine dictum sit altum viditur.
  (Whatever is said in Latin seems profound.)

-----Original Message-----
From: rpg400-l-admin@midrange.com [mailto:rpg400-l-admin@midrange.com]On
Behalf Of Bartell, Aaron L. (TC)
Sent: Thursday, April 25, 2002 6:53 PM
To: 'rpg400-l@midrange.com'
Subject: FTP from an RPG program


I know how to dynamically build an FTP script in an RPG program and then
execute that script from a CL program with the FTP CL command, but I am
wondering if I can do a QCMDEXC from within a RPG program and get the same
results?

I am basically trying to take all of the FTP processes out of the CL program
and put it into the RPG program for reasons I don't wish to take the time to
explain.

Here is what I am doing, but it doesn't seem to be executing the FTP
command.

         qCmdCmd = 'OVRDBF FILE(INPUT) TOFILE(QTEMP/QFTPSRC)
MBR(FTPSCRIPT)';
         exsr $qCmdExc;

         qCmdCmd = 'FTP RMTSYS(172.99.99.99)';
         exsr $qCmdExc;

       . . .

     C     $qCmdExc      BEGSR
     C                   call      'QCMDEXC'                            01
     C                   parm                    qCmdCmd
     C                   parm                    qCmdLen
     C                   ENDSR

note: Member FTPSCRIPT does have FTP commands in it to process.

Anybody got any suggestions,
Aaron Bartell



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.