星期二, 10月 31, 2023

2000-04-07 如何於兩台 AS/400 間利用 TCP/IP 協定互相傳送報表 ?


如何於兩台 AS/400 間利用 TCP/IP 協定互相傳送報表 ?

1. 於兩台 AS/400 間設定 TCP/IP 環境,及啟動 TCP/IP STRTCP
   (請參照我的網頁上 AS/400 中文文件)

2. 使用 LPR command
   LPR        RMTSYS(*INTNETADR) PRTQ(Remote AS/400 Outq) + 
              FILE(spooled file name) SPLNBR(spooled file number) +            
              DESTTYP(*AS400) TRANSFORM(*NO) +         
              INTNETADR(Remote AS/400 IP address)                  
3. 或使用 Remote Outq
                          System A            System B             
   Local Receive outq                                              
   CRTOUTQ OUTQ           QGPL/RCVFRMSYSB     QGPL/RCVFRMSYSA      

   Send to Remote outq                                             
   CRTOUTQ OUTQ           QGPL/RMTOUTQB       QGPL/RMTOUTQA        
           RMTSYS         *INTNETADR          *INTNETADR           
           RMTPRTQ        QGPL/RCVFRMSYSA     QGPL/RCVFRMSYSB      
           CNNTYPE        *IP                 *IP                  
           TRANSFORM      *NO                 *NO                  
           INTNETADR      SysB's IP address   SysA's IP Address    

   A 送到 B :將報表指定 OUTQ 到 QGPL/RMTOUTQB
   B 送到 A :將報表指定 OUTQ 到 QGPL/RMTOUTQA

PS:若指定 OUTQ OUTQ 不存在,系統會自動轉到 System Value: QPRTDEV
          所指定之印表機


沒有留言: