× 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.




Giri,

The system will interpret anything following the RCMD statement as a
string to be executed, so what you have written looks good.  You can add
parameters to the call by using the standard format of the CALL command.

Does your RPG program access objects such as files?  If so, how are you
determining the library list for your program?  You might have better
results by calling your RPG program from within a CL program which
establishes the environment and then calls the RPG program.

Regards,
Andy Nolen-Parkhouse


> -----Original Message-----
> From: rpg400-l-bounces@midrange.com [mailto:rpg400-l-
> bounces@midrange.com] On Behalf Of Giri Gopal
> Sent: Tuesday, February 04, 2003 4:00 PM
> To: RPG programming on the AS400 / iSeries
> Subject: How to call rpg pgm from FTP RCMD
> 
> Hi:
> 
> I am using FTP to upload a file. Once the file is uploaded I want to
> run a
> rpg program using FTP RCMD. Here is the code I have. For some reason I
> am
> getting an error. Also can I pass a parm with this call?. If I can,
> what's
> the format of the call?
> 
> 
> Thanks for your help in advance.
> Giri Gopal
> 
> MY FTP CODE:
> 
> open s10
> test
> test
> quote rcmd call pgm(mylib/test)
> quit
> 
> MY LOG FILE:
> 
> ftp> Connected to s10.abccorp.net.
> open s10
> 220-QTCP at s10.
> 220 Connection will close if idle more than 5 minutes.
> User (s10.abccorp.net:(none)):
> 331 Enter password.
> 
> 230 test logged on.
> ftp> ftp>
> quote rcmd call pgm(mylib/test)
> 550-Error occurred on command call pgm(mylib/test).
> 
> 550 Error found on CALL command..
> 
> ftp> quit
> 221 QUIT subcommand received.



As an Amazon Associate we earn from qualifying purchases.

This thread ...

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.