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


  • Subject: RE: export direct from AS400 to PC w/o CA
  • From: Chris Bipes <ChrisB@xxxxxxxxxxxxxxx>
  • Date: Tue, 27 Jul 1999 15:27:04 -0700

I  have done this.  If you have FTP services running on your NT server do
the following from an AS400 command line.

1. FTP "NT server name or Address"
You should now be prompted to log on.
2. log on to your NT server
3. use the PUT command to FTP the file from your AS400 to your NT. (PUT
YourLib/YourFile.YourMbr NTDirectory/File.type)

I have attached a FTP script file from an AS400 Source file and a little CL
to execute the command so as to automate.

There is also a company that sells a package to do this.  I can't remember
the company name but I originally found it at http://Search400.com web site.

ftp script to login and download to ftp server. (in source pf member)
/***************************************************************************
***/
anonymous uppaurs
put yourlib/yourfile.yourmbr PCFileName.Type (Replace
quit
/***************************************************************************
***/

CL Source of program to automate the processing of the script

/***************************************************************************
***/
/* GENERIC FTP FROM PC TO AS400 DATA BASE
*/
/*
*/
/*
*/
/*By Chris BipesEUR                                           07/10/98
*/
/*'© CrossCheck, Inc., 6119 State Farm Drive, Rohnert Park, CA  94928EUR
*/
/***************************************************************************
***/
             PGM        PARM(&RMTSYS &FTPSRCMBR)

             DCL        VAR(&RMTSYS   ) TYPE(*CHAR) LEN(20)
             DCL        VAR(&FTPSRCMBR) TYPE(*CHAR) LEN(10)

             CLRPFM     FILE(FTPSRC) MBR(FTPOUT)
             OVRDBF     FILE(INPUT) TOFILE(FTPSRC) MBR(&FTPSRCMBR)
             OVRDBF     FILE(OUTPUT) TOFILE(FTPSRC) MBR(FTPOUT)
             FTP        RMTSYS(&RMTSYS)
             PRTSRC     FILE(FTPSRC) MEMBER(FTPOUT)

             ENDPGM
/***************************************************************************
***/

Christopher K. Bipes            mailto:ChrisB@Cross-Check.com
Sr. Programmer/Analyst          mailto:Chris_Bipes@Yahoo.com
CrossCheck, Inc.                http://www.cross-check.com
6119 State Farm Drive           Phone: 707 586-0551 x 1102
Rohnert Park  CA  94928         Fax: 707 586-1884



-----Original Message-----
From: Mike Cunningham [mailto:MCUNNING@pct.edu]
Sent: Tuesday, July 27, 1999 1:42 PM
To: MIDRANGE-L@midrange.com
Subject: RE: export direct from AS400 to PC w/o CA


I can and have done the automated FTP to an NT server, and I know that
W95/98/NT comes with FTP and I have used that in an interactive process
where I start a DOS session, run ftp to the AS/400, logon and download.
What I would like to do is automate file transfers to the PC from the AS/400
without PC user intervention.  A scenerio something like this....

User starts a CA 5250 session
Signons and gets a menu
runs one of my applications (like a class roster)
presses a command key that I have labeled "copy roster to C: drive"
RPG/CL application builds the file, does CPYTOPCD, initiates FTP on the
AS/400 to put it to C: drive on the PC

>From everything I have investigated this can't be done.  I'm a missing
something ?
+---
| 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 thread ...

Follow-Ups:

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.