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



old code, but it works - fix the file length to the length of your source mbr
in this sample file name passed in as parm
Jim

f* qclsrc is overridden to member with ftp instructions
fInput UP F 92 DISK
d* define work fields
d Fr1 S 3 0 inz
Iinput NS
I 13 92 srcdta
c *entry plist
c parm filnam 25
c* scan record
C 'GET' scan srcdta fr1 97
c if *in97 = *on
c eval fr1 = fr1 + 4
c eval %subst(srcdta:fr1:50) = %triml(filnam) +
c ' NXXXNOC.CSV (REPLACE'
c except $upd
c endif
Oinput e $upd
O srcdta 92
----- Original Message ----- From: <jeffw@xxxxxxxxxxxxxxxx>
To: "RPG programming on the IBM i / System i" <rpg400-l@xxxxxxxxxxxx>
Sent: Friday, February 27, 2009 1:43 PM
Subject: FTP Batch/Script File with variables


Hi List
I need some help. I have an FTP script file that currently works fine. It is a
txt file in our source lib. I need to change the directory name that it works
with in the script. The problem I have is the directory name is a date. So it
changes a lot. I want to be able to programmaticly change the directory name
in the script file. I think I should be able to write to it via RPG but it
does not seem to work. Any thoughts? Thanks in advance

Jeff Williams
--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-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.