1

我们需要从基于 IBM AS400 的 rpg/iseries 程序访问 https api。

为了尝试这个，我们安装了“Mocha W32 TN5250”，但无法连接到会话。

是否可以从基于 IBM AS400 的 rpg/iseries 程序进行 https 调用？

4

3 回答 3

4

一种常用的方法是使用Scott Klement 的 http 包

当我们需要从我们使用的供应商处调用 Web 服务时，我们会使用它。

于 2013-08-22T10:57:52.893 回答
2

在 SQL 中，您可以使用 IBM 在 SYSTOOLS 中提供的HTTP 函数。
请参阅 IBM PartnerWorld 白皮书。

只需将 SQL 嵌入到您的 RPG 程序中即可。

例如：

dcl-s city      varchar(60);
dcl-s state     varchar(2);
dcl-s zip       varchar(10);
dcl-s area      varchar(3);
dcl-s zone      varchar(3);

EXEC SQL
SELECT city, state, zip, areacode, timezone
  INTO :city, :state, :zip, :area, :zone
  FROM XMLTABLE('$doc/NewDataSet/Table' PASSING
                XMLPARSE(DOCUMENT SYSTOOLS.HTTPGETCLOB('http://www.webservicex.net/uszip.asmx/GetInfoByZIP?USZip=49525','')) AS "doc"
                COLUMNS
                  City      VARCHAR(60)  PATH 'CITY',
                  State     VARCHAR(2)   PATH 'STATE',
                  Zip       VARCHAR(10)  PATH 'ZIP',
                  AreaCode  VARCHAR(3)   PATH 'AREA_CODE',
                  TimeZone  VARCHAR(3)   PATH 'TIME_ZONE'
               ) AS WebServiceResult
  ;
于 2017-04-26T20:12:02.947 回答
1

Brad Stone 在BVS Tools 的解决方案 - GetURI提供了一个命令行界面以及一个我们用来成功使用大量 Web 服务的 API。

（这里提到的可能是比斯科特更轻的替代品 - 绝对不是对斯科特或他的工具的不尊重！）

于 2014-02-27T19:41:20.580 回答