AS/400 FTP是一個(gè)很難完全搞懂的問題，因此在TechTarget的IT Knowledge Exchange(ITKE)上經(jīng)常會有人提問。負(fù)責(zé)FTP安裝和AS/400服務(wù)器通訊環(huán)境（正式改名為“IBM iSeries”）的廣域網(wǎng)工程師，當(dāng)他們需要在WAN上FTP文件時(shí)，會發(fā)現(xiàn)這篇文章很有用。

問：AS/400服務(wù)器如何對FTP服務(wù)器可見？

答：首先，你要從你的服務(wù)提供商那得到一個(gè)外部IP地址，然后你必須在防火墻上設(shè)置好映射IP地址。只要AS/400有一個(gè)能夠工作的默認(rèn)路由，那么FTP服務(wù)器就可以使用外部IP地址訪問AS/400。

另外，如果AS/400是客戶端，你需要通過命令行運(yùn)行FTP來連上遠(yuǎn)程主機(jī)。只要客戶機(jī)可以路由到遠(yuǎn)程主機(jī)，并且防火墻開放了FTP協(xié)議端口，那么就可以通訊了。

問：我如何在AS/400運(yùn)行程序 FTP到一個(gè)FILE.savf？我知道怎樣在DOS窗口輸入命令，但是我想借助庫里的PC文件(FILE.savf)到AS/400存檔文件(FILEA)來使用AS/400程序(RPGLE or CLLE)。

答：首先，在AS/400選擇一個(gè)文件(example.savf )并拖拽到/home/yourname目錄。

然后，運(yùn)行下面命令：

CPYFRMSTMF FROMSTMF( example.savf )  
TOMBR( '/qsys.lib/qgpl.lib/example.file' )  
MBROPT( *REPLACE )  
CVTDTA( *NONE )  
ENDLINFMT( *FIXED )  
TABEXPN( *NO ) 

運(yùn)行結(jié)果在QGPL的EXAMPLE的存檔文件里。

但要滿足一些條件。首先，一臺NetServer服務(wù)器得運(yùn)行在AS/400上，并能在windows網(wǎng)絡(luò)中可用。在這個(gè)例子中，/home/username必須配置成共享目錄并且為了使Netserver訪問IFS，需要啟動文件服務(wù)器。由于大多數(shù)站點(diǎn)是用NetServer和文件服務(wù)器，所以一切可能早都已配置好。

如果BPCS下載是直接保存到my /home/toml目錄，那就不需要上述拖拽，一個(gè)單獨(dú)的命令就夠了。

問：如何在AS/400上編寫FTP批處理程序到PPT擴(kuò)展文件中？

你需要創(chuàng)建包含F(xiàn)TP命令的腳本文件，通常有下面兩種方式：命令行；如果你需要做不同的轉(zhuǎn)移，也可以編寫程序來建立文件。但不論哪種情況，你都要用到以下命令：

userid  
password  
cd remote_directory  
lcd local_library  
put local_file remote_file  
(OR)  
get remote_file local_file  
quit  
 

下面列表解釋了命令行的作用

remote_directory = 遠(yuǎn)程設(shè)備的目錄或庫  
local_library = 本地設(shè)備的庫  
local_file = 本地設(shè)備的文件名  
remote_file = 遠(yuǎn)程設(shè)備的文件名  
 

根據(jù)傳送的文件和位置，你也許還要其他命令，如BIN或ASCII。

執(zhí)行腳本文件的***方法是創(chuàng)建一個(gè)小型CL程序：

1 對腳本文件覆蓋FTP輸入

OVRDBF FILE(INPUT) TOFILE(YourLibrary/YourScript) 

2 對日志文件覆蓋FTP輸出

OVRDBF FILE(OUTPUT) TOFILE(YourLibrary/LogFile) 

3 用主機(jī)名或者FTP地址開啟FTP

FTP RMTSYS(Your_Remote_System) 

4 移除覆蓋

DLTOVR FILE(*ALL) 

問：我把每天運(yùn)行的報(bào)告保存在我的IFS的ABC的文件夾(wrklnk ABC)。該文件夾包含帶有擴(kuò)展日期的10個(gè)CSV文件夾。我該如何使用AS/400打包所有CSV文件，F(xiàn)TP到另外一個(gè)系統(tǒng)？

答：有很多不同的方法在AS/400上創(chuàng)建可用的ZIP文件。一個(gè)直接的方法是購買第三方產(chǎn)品、或是使用用戶功能界面友好的系統(tǒng)、或是用程序代碼執(zhí)行zipping 文件算法。如果購買不現(xiàn)實(shí)或者不需要友好界面，那么安裝有Qshell的AS/400s可以用Java Jar（或ajar）工具來創(chuàng)建.ZIP兼容文件。基本使用方法是在Qshell命令行中鍵入“jar”。

問：我該如何從一個(gè)目錄復(fù)制IFS文件到另外一個(gè)文件，然后FTP該文件？

答：使用下面CPY命令：

CPY OBJ('/MyDirectory/MyFile.csv') TOOBJ('/MyOtherDirectory/MyOtherFile.x') 

為了通過FTP發(fā)送IFS文件，要使用FTP或者STRTCPFTP命令開啟文件傳輸。登陸后，輸入namefmt 1處理IFS上的分層文件系統(tǒng)。cd（改變目錄）和lcd（本地改變目錄）可以操縱目錄架構(gòu)。***，用put命令從源地址復(fù)制某個(gè)文件到目標(biāo)地址。

問：我如何在AS/400上FTP一個(gè)文件到Zebra 170Xill打印機(jī)的磁盤R上？

答：你可以定義Zebra字符打印機(jī)，就像Epson 850。有了該配置，就沒必要FTP該打印文件，因?yàn)椴倏v系統(tǒng)可以管理spool文件的發(fā)送。為了配置打印機(jī)為字符打印機(jī)，在安裝時(shí)候配置成generic text。如果是在AS/400上，配置也一樣。Zebra打印機(jī)通過USB連到電腦。

問：通過FTP到NT卡我們在AS/400上接收到文件。我可以很方便地從NT卡FTP到AS/400。有沒有方法從NT卡的AS/400上開始或者由IFS處理文件？

答：一個(gè)可行方法是在DOS批處理文件中使用RMTCMD命令，如下所示：

RMTCMD RUNQRY QRY(MYLIB/MYQUERY) //10.198.16.4 

RMTCMD命令可以，但它需要有人提供用戶配置信息和每次運(yùn)行的密碼。為了使一臺服務(wù)器執(zhí)行RMTCMD，你可以在iSeries Access運(yùn)行CWBLOGON命令，它提供個(gè)人配置和密碼。

一旦RMTCMD完成，用參數(shù)再一次運(yùn)行CWBLOGON清除個(gè)人配置和密碼緩存。運(yùn)行帶/？參數(shù)的命令，請查看Windows幫助文檔。

問：為了從一臺FTP服務(wù)器傳送文件到iSeries，我要為FTP尋找更好的方法。傳送文件依賴于一臺要被更換的服務(wù)器，而FTP只能通過它。

當(dāng)前進(jìn)程使用FTP dir命令列出日志文件，然后創(chuàng)建一個(gè)即時(shí)腳本FTP該文件到iSeries。我會考慮在iSeries新建一個(gè)NETSHARE磁盤，然后在那上面?zhèn)魉臀募?，但是辦公室是在WAN上的遠(yuǎn)程站點(diǎn)，有5250種進(jìn)程通過該鏈路運(yùn)行，外加上GUI和其他不同類型的數(shù)據(jù)和應(yīng)用，我不希望它們的流量相互影響。

答：當(dāng)兩個(gè)系統(tǒng)都是iSeries，該列表可以包括DDM、SNDNETF、IFS的QFileSvr文件系統(tǒng)等。雖然有一些好處，如TCP，QoS，但所有這些都對共享同一信道的交互用戶有潛在影響。根據(jù)數(shù)據(jù)，你可以壓縮數(shù)據(jù)來降低對通信線路的影響。

另一個(gè)辦法是根據(jù)數(shù)據(jù)來源，只要它們在源系統(tǒng)上可用，就發(fā)送單個(gè)數(shù)據(jù)而不是整個(gè)文件。如果是數(shù)據(jù)庫數(shù)據(jù)，一個(gè)簡單的觸發(fā)程序就可以實(shí)時(shí)發(fā)送數(shù)據(jù)——直接寫入到socket、DDM *DTAQ、DDM數(shù)據(jù)庫或是其他相似的方法，你可以記錄文件日志并且在傳送到目標(biāo)系統(tǒng)時(shí)實(shí)時(shí)接收日志圖片（或使用遠(yuǎn)程日志）。因?yàn)閿?shù)據(jù)傳播的時(shí)間周期較長，這樣做將對交互式用戶的潛在影響降到最小，你也可以建立自己的節(jié)流控制。