在 IBM i (OS/400) 上如何使用 SQL 调用 RPG 程序

本例中展示了如何使用在IBM i系统上使用SQL语句调用RPG程序。RPG程序将被传递变量后，将输出被返回到SQL查询的结果集中。

CREATE FUNCTION MY_RPG_FUNCTION (IN_PAR1   CHAR(4) )
   RETURNS TABLE                  -- 返回表格变量
   (COLUMN1 CHAR(30) )           -- 返回一个字段
   LANGUAGE RPGLE                 -- 写成ILE RPGLE程序
   SPECIFIC MY_SQL_PROCEDURE      -- FQ名字，用于绑定
   NOT DETERMINISTIC
   NO SQL
   CALLED ON NULL INPUT
   EXTERNAL NAME MY_RPG_FUNCTION
   PARAMETER STYLE GENERAL
;

免责申明：文章和图片全部来源于公开网络，如有侵权，请通知删除 server@dude6.com