Re: BATCH FTP question

Thomas

I think it has to be either a source PF or a flat file - not created from source, just CRTPF with a record length.

I'm not sure of the latter, but maybe.

Anyhow, yes, you can write to a source PF, just like anything else. And I suggest doing it with SQL -

insert into your file (srcdta) values('each line of your FTP script')

This way you don't need to worry about the SRCDAT and SRCSEQ fields.

HTH
Vern

On 2/18/2015 10:46 AM, Thomas Burrows wrote:

Monty:

Another person says the file does not have to be a source PF. But if I do
make it a source PF will I be able to put records in a source PF from a RPG
program.

On Wed, Feb 18, 2015 at 10:26 AM, Monty G. James <monty.james@xxxxxxxxxxxxxx

wrote:
The input file need to be a source PF, 3 fileds the third field(SRCDTA
CHAR 80) is where your ftp commands go.
Use CRTSRCPF to create your input file and add the appropriate FTP
commands to it.


subject: 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


------------------------------

Subject: Digest Footer

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) digest list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
http://cp.mcafee.com/d/FZsSd20w76Qm4S4NPybW9KVJd5ZN5ZZYSCy-UyUYedFELK8LLK6QQjhOCyOO-rlH2prx7lvE2yti10IvkwgbsKr9R842NZi10JOVJwxF1zS7-LNEVvjsWZOWqtXYyYe79YJteOaaJXFYG7DR8OJMddEK6QhNK_8K6zBV55BeXNKVI06vaAWsH92eM8_O-2qKMM-l9OwXn5p8hS17OVVJmi4twhYKun8lrxrW01lH2prx7lvEsjGg85zWA21rBMkH92eM8_OVJ4sye76NId3wm80M93hsaCy0eAh-AM3d40pGuq84m03d40rizvCy1dxUSOUrtVyrrWaMsV4v
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at
http://cp.mcafee.com/d/FZsS82gAcy1J5xdxcsUy-yrKrjhvshvvvdFELK8Kf3zqqbXybXXxJd4QsFEIILCRqMCmUhRnW0EDkwgb7R842TbCOti10IvkwgbsKro8qgoZx_HYqenQTeLsKCDu_8L3xOvbnjIyyHuWvaxVZicHs3jq8USyedTV5MQsL8EIFTudTdw0ZzoD8P_aOgzI2fYLyIA8X0zVsYSH92eM8-nfbAaJMJZ00GRxcJMzGLQe9R842NZi10JOUalAx7o4vVsSyeh73zoS6xMb40o4xEK5jh07i8_io1Cy0cRfd42b01Cy0dFhLPh0CMYrpsdzAsugaxKviYY
.



------------------------------

End of MIDRANGE-L Digest, Vol 14, Issue 248
*******************************************

________________________________

This email message, including any attachment(s) is for the sole use of the
intended recipient(s) and may contain confidential information. Any
unauthorized review, use, disclosure or distribution is strictly
prohibited. If you are not the intended recipient, please immediately
contact the sender by email.

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