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



I have written a batch ftp utility several years ago that is still being used daily here.

The input file is a regular PF with one alpha field in it of length 256

The first line of the input file is like this:
<userid> <password>

There is no USER fpt command, just the user id followed by the password.

In the CL, this is how the override is :
OVRDBF FILE(INPUT) TOFILE(QTEMP/&WRKFILE) +
MBR(*FIRST) OVRSCOPE(*JOB)

As someone else mentioned, if you do not override the output file and run interactively, you should see what is happening on your screen.

Denis Robitaille
Chef de service TI
Cascades Centre des technologies,
une division de Cascades Canada ULC
412 Marie Victorin
Kingsey falls(Québec) Canada J0A 1B0
T : 819 363 6130
Pour toute information sur les événements techniques, veuillez consulter notre calendrier Groupwise CAS_CALENDRIER_TI

-----Message d'origine-----
De : MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] De la part de Thomas Burrows
Envoyé : 18 février 2015 11:15
À : Midrange Systems Technical Discussion
Objet : BATCH FTP question

Trying to do a BATCH FTP and something is not working.


CLRPFM FILE(SAW_FTP_O)

CALL PGM(SAW_FTP)

OVRDBF FILE(INPUT) TOFILE(SAW_FTP_F) MBR(SAW_FTP_F)

OVRDBF FILE(OUTPUT) TOFILE(SAW_FTP_O) MBR(SAW_FTP_O)

FTP RMTSYS(THOFS001)

DLTOVR FILE(*ALL)

My input file SAW_FTP_F has this in it.



Running the above CL commands in DEBUG all I get is

=========================================================================

File Transfer Protocol


Previous FTP subcommands and
messages:
Connecting to host THOFS001.ACPRODUCTSINC.COM at address 10.41.84.20 using port 21.
220 Microsoft FTP
Service




























Enter login ID (tburrows):

=============================================================================

Appears that my file of FTP commands "SAW_FTP_F


REIN
USER userid password
NAMEFMT 1
ASCII
put qtemp/BIRC_0216O.saw_f_prg /omga/BIRC_0216.prg
put qtemp/MAPL_0216O.saw_f_prg /omga/MAPL_0216.prg
put qtemp/OAK__0216O.saw_f_prg /omga/OAK__0216.prg
put qtemp/WHIT_0216O.saw_f_prg /omga/WHIT_0216.prg
put qtemp/ALDE_0219O.saw_f_prg /omga/ALDE_0219.prg
put qtemp/BIRC_0219O.saw_f_prg /omga/BIRC_0219.prg
put qtemp/CHER_0219O.saw_f_prg /omga/CHER_0219.prg
put qtemp/MAPL_0219O.saw_f_prg /omga/MAPL_0219.prg
put qtemp/OAK__0219O.saw_f_prg /omga/OAK__0219.prg
put qtemp/WHIT_0219O.saw_f_prg /omga/WHIT_0219.prg
QUIT

is not being picked up.

If it matters the FTP commands in SAW_FTP_F are being generated by a RPG program I wrote. Thus the SAW_FTP_F is not a TEXT file. But a straight PF that has one field name that is an alpha 80.

Could this be a problem.

Thomas in
Dallas
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l.


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.