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



ftp> lcd
*Local directory now C:\Users\Thomas Burrows\Desktop\Subfile_Code.*


*Pointing to local folder on PC.*ftp> lcd
*Local directory now C:\Users\Thomas Burrows\Desktop\Subfile_Code.*
*Testing GET command to verify I will put something in local folder. Allows
me to make sure everything is pointing to the right places.*

*Telling FTP where to go get the data on IBM i Power Server*

Maybe I need to do a GET from the IBM i Power Server first to establish
WHATEVER???


ftp> get /QSYS.LIB/cobolkid1.LIB/qrpglesrc.FILE/samplepgm.MBR samplex.txt
200 PORT subcommand request successful.
150 Retrieving member SAMPLEPGM in file QRPGLESRC in library COBOLKID1.
226 File transfer completed successfully.
ftp: 4770 bytes received in 0.13Seconds 36.41Kbytes/sec.

*A test PUT to make sure the code shows back up on the IBM i Power Server.*

ftp> put samplex.txt /qsys.lib/cobolkid1.lib/qrpglesrc.file/samplex.mbr
200 PORT subcommand request successful.
150 Sending file to member SAMPLEX in file QRPGLESRC in library COBOLKID1.
226 File transfer completed successfully.
ftp: 4770 bytes sent in 0.14Seconds 32.90Kbytes/sec.

*From here on down moving about 33 pieces of code to the IBM i Power
Server. Used to be called AS400. Then IBM i Server.*


ftp> put pnl001df.txt /qsys.lib/cobolkid1.lib/qrpglesrc.file/pnl001df.mbr
200 PORT subcommand request successful.
150 Sending file to member PNL001DF in file QRPGLESRC in library COBOLKID1.
226 File transfer completed successfully.
ftp: 2321 bytes sent in 0.14Seconds 16.70Kbytes/sec.
ftp> put pnl001rg.txt /qsys.lib/cobolkid1.lib/qrpglesrc.file/pnl001rg.mbr
200 PORT subcommand request successful.
150 Sending file to member PNL001RG in file QRPGLESRC in library COBOLKID1.
226 File transfer completed successfully.
ftp: 1499 bytes sent in 0.14Seconds 10.78Kbytes/sec.
ftp> put sfl001lf.txt /qsys.lib/cobolkid1.lib/qrpglesrc.file/sfl001lf.mbr
200 PORT subcommand request successful.
150 Sending file to member SFL001LF in file QRPGLESRC in library COBOLKID1.
226 File transfer completed successfully.
ftp: 111 bytes sent in 0.33Seconds 0.34Kbytes/sec.
ftp> put sfl001pf.txt /qsys.lib/cobolkid1.lib/qrpglesrc.file/sfl001pf.mbr
200 PORT subcommand request successful.
150 Sending file to member SFL001PF in file QRPGLESRC in library COBOLKID1.
226 File transfer completed successfully.
ftp: 382 bytes sent in 0.36Seconds 1.06Kbytes/sec.


There were more file PUTS but the same thing. Different names.

On Thu, Jun 1, 2023 at 6:54 PM Vern Hamberg via MIDRANGE-L <
midrange-l@xxxxxxxxxxxxxxxxxx> wrote:

It would be helpful to see what worked -

Vern

On 6/1/2023 1:29 PM, Thomas Burrows wrote:
finally got this to work. Thanks everyone for the help.

On Thu, Jun 1, 2023 at 1:20 PM Patrik Schindler <poc@xxxxxxxxxx> wrote:

Hello Thomas,

Am 01.06.2023 um 18:59 schrieb Thomas Burrows <
thomas.burrows.1957@xxxxxxxxx>:

ftp> get /QSYS.LIB/cobolkid1.LIB/qrpglesrc.FILE/aslf00df.MBR
aslf00df.txt
200 PORT subcommand request successful.
426-Member ASLF00DF in file QRPGLESRC in library COBOLKID1 not found.
426 Data transfer ended.
Well, you can see from the error message, the member isn't found. Are
you
sure it exists?

But the command was correct.

ftp> put /QSYS.LIB/cobolkid1.LIB/qrpglesrc.FILE/aslf00df.MBR
aslf00df.txt
/QSYS.LIB/cobolkid1.LIB/qrpglesrc.FILE/aslf00df.MBR: File not found
That won't work. Put is upload, get is download.

Now what? Maybe I can send over the zip file over and PAY you to FTP
into my BCD400 library and file:-)

Which ZIP file are you talking about?

:wq! PoC



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

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription
related
questions.



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

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
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.