|
I had a similar program need this is what I did, it may not be the best of solutions. What I am doing is on the as/400 when the user pressed a cmd key I take a var that they enter and go to another network on our lan to get that var.txt file and bring it back to the as/400. Hope this helps. 1. In CL on the 400 I create a cmd that has the two system names I am getting the files from. file.bat is the bat file on the IFS, and field.txt is the file I am grabbing from the other system on the network. I replace 'field' with the variable name I want (ie. date in your case) 2. file.bat - copies the file I send in from the CL and copies it to a generic name file. I then ftp this file up to the as/400. 3. Is the file containing the ftp steps 1. *************** Beginning of data ********************************* PGM PARM(&var) DCL VAR(&var) TYPE(*CHAR) LEN(2) DCL VAR(&CMD) TYPE(*CHAR) LEN(100) CHGVAR VAR(&CMD) + VALUE('\\ifssystem\dir\file.bat + \\othersystem\dir\field.txt') CHGVAR (%SST(&CMD 36 2)) VALUE(&var) STRPCO MONMSG MSGID(IWS4010) STRPCCMD PCCMD(&CMD) PAUSE(*NO) ENDPGM 2. FILE.BAT: COPY %1 \\system\dir\genericfile.TXT ftp -s:\\system\dir\file.txt exit 3. genericfile.txt open (ip address) user password put c:\dir\genericfile.txt library/destinationfile.mbr quit -----Original Message----- From: owner-midrange-l@midrange.com [mailto:owner-midrange-l@midrange.com]On Behalf Of Jeff Burcher Sent: Tuesday, April 04, 2000 2:24 PM To: MIDRANGE-L (E-mail) Subject: FTP and variables Hi, I am trying to automate sending spool files to a FTP Server from our AS400. The only real problem I am encountering is using a variable for the PC file name. The main reason for using a variable is I want to include the date as part of the file name. Is there a way to use a variable in the FTP PUT command or perhaps there is another way around this? Thanks, Jeff Burcher AS/400 Programmer GMA/CBCC jburcher@cbcolcntr.com +--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to MIDRANGE-L@midrange.com. | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +--- +--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to MIDRANGE-L@midrange.com. | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---
As an Amazon Associate we earn from qualifying purchases.
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.