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.
midrange.com
