as400不同服務(wù)器之間的文件導(dǎo)入

城市色彩

假設(shè)有一臺(tái)服務(wù)器的IP地址為:192.168.0.40（服務(wù)器一）,另一臺(tái)的是:192.168.2.16（服務(wù)器二），現(xiàn)在要將服務(wù)器一的某個(gè)庫下（zrplib1）的文件(QDSPSRC)導(dǎo)入到服務(wù)器二的某個(gè)庫(zrplib2)下。

第一步：在服務(wù)器一創(chuàng)建一個(gè)*savf類型的文件，執(zhí)行命令"crtsavf"，在彈出的窗口中個(gè)參數(shù)的設(shè)置如下

   1） Savefile  zdspsrc                                    /*自己取的名，在后面的savobj中用到此文件*/

   2）   Library  QGPL                                       /*服務(wù)器一下QGPL庫*/

第二步：在服務(wù)器一中，把要復(fù)制的文件(QSDPSRC)保存到步驟一創(chuàng)建的文件中.執(zhí)行"savobj"命令,在彈出的窗口中參數(shù)的設(shè)置如下.

   1) Objects   QDSPSRC                                /*要復(fù)制的文件名*/

   2）   Library      zrplib1                                /*要復(fù)制的文件所在的庫*/

   3) Device    *savf  

   4)  Savefile   zdspsrc                                 /*復(fù)制到此文件下*/

   5）   Library  QGPL                                    /*文件zdspsrc所在的庫、服務(wù)器一下QGPL庫*/

注意：在此步驟中，按下F10，有一個(gè)重要的參數(shù),Target release   *CURRENT            /*關(guān)于版本，如果從5.2版本->5.4版本，默認(rèn)值就可以了，如果從5.4版本->5.2版本，需要設(shè)置成V5R2MO     按下F4會(huì)有提示*/

第三步:在程序的運(yùn)行中，輸入"cmd"，訪問服務(wù)器一,并把zrplib的QGPL庫下的文件zdspsrc導(dǎo)出到AS400客戶端的PC某個(gè)盤（比如C:\自己取的文件名）上.

   1)輸入命令：ftp  192.168.0.40

  2) 輸入用戶名和密碼

  3)輸入"bin"                                                  /*轉(zhuǎn)換為二進(jìn)制*/

  4)輸入get     QGPL/zdspsrc        c:\zzzzsrc

  5)最后輸入"bye"

第四步:在服務(wù)器二上創(chuàng)建一個(gè)空的savf文件，執(zhí)行命令"crtsavf"，參數(shù)設(shè)置

   1）Object   abcsrc                                     /*名字可以隨便取*/

   2)      Library   QGPL                                  /*服務(wù)器二下QGPL庫*/

第五步：在運(yùn)行dos下（和第三步一樣）訪問服務(wù)器二，把剛才從導(dǎo)出到本地PC的C:\zzzzsrc的文件復(fù)制到服務(wù)器二的QGPL庫下的abcsrc上。

    1）ftp   192.168.2.16  

   2) 輸入用戶名和密碼

   3)輸入"bin"                                                            /*轉(zhuǎn)換為二進(jìn)制*/

   4)輸入put       c:\zzzzsrc          QGPL/abcsrc   

   5)最后輸入"bye"

第六步：在服務(wù)器二下，執(zhí)行"rstobj"命令，參數(shù)設(shè)置

   1）   Object        QDSPSRC                   /*在服務(wù)器一的要復(fù)制的文件名*/

   2)    Saved    Library    zrplib1

   3)   Device   *savf

   4） Save file  abcsrc

   5)   Library QGPL            /*服務(wù)器二下QGPL庫*/

  6）按下F10,PageDown,在額外參數(shù)中，有個(gè)重要的參數(shù),Restor to Library  zrplib2

  注意：如果此時(shí)zrplib2庫下已經(jīng)存在有QDSPSRC文件名，則無法Restor成功，要解決此問題，可以在復(fù)制開始之前，修改zrplib1下QDSPSRC的名稱，比如改成ZDSPSRC等，在開始以上的操作，就可以了。