DB2 for iSeries：如何将表行作为参数传递给SQL函数

关于记录类型参数的可行性 #

DB2 for iSeries（现称IBM i Db2）的SQL PL函数不支持直接将表的行类型作为参数——这也是你找不到对应方案的原因。不过可以通过以下几种替代方案简化参数传递，同时避免二次查表的性能问题或复杂度：

方案1：使用ROW构造器封装整行数据 #

通过SQL的ROW()构造器将整列数据打包为单个ROW类型参数传递给函数，函数内部直接通过字段名访问列值：

修改后的行级函数 #

CREATE OR REPLACE FUNCTION ROWFUNCTION(ROW_DATA ROW(ID INT, F1 INT, F2 INT, F3 INT, F4 INT, F5 INT, F6 INT, F7 INT, F8 INT, F9 INT, F10 INT)) 
RETURNS INT
LANGUAGE SQL
CONTAINS SQL
RETURN ROW_DATA.F1 + ROW_DATA.F2 + ROW_DATA.F3 + ROW_DATA.F4 + ROW_DATA.F5 + ROW_DATA.F6 + ROW_DATA.F7 + ROW_DATA.F8 + ROW_DATA.F9 + ROW_DATA.F10;

调用方式（主函数内） #

FOR C CURSOR FOR SELECT * FROM TESTTABLE DO 
    SET RES = RES + ROWFUNCTION(ROW(ID, F1, F2, F3, F4, F5, F6, F7, F8, F9, F10));
END FOR;

这种方式虽然调用时仍需列出所有列，但函数参数仅为一个，后续若表结构变更，只需同步修改函数的ROW类型定义即可，比传递零散参数更易维护。

方案2：将行级逻辑内联至主查询 #

如果行级运算逻辑不需要复用，可直接将计算逻辑嵌入游标查询中，彻底避免函数参数传递：

CREATE OR REPLACE FUNCTION DOSOMETHING() RETURNS INT
LANGUAGE SQL 
READS SQL DATA
BEGIN
    DECLARE RES INT DEFAULT 0;

    -- 直接在查询中计算行级求和
    FOR C CURSOR FOR 
        SELECT ID, F1+F2+F3+F4+F5+F6+F7+F8+F9+F10 AS ROW_SUM 
        FROM TESTTABLE 
    DO 
        SET RES = RES + C.ROW_SUM;
    END FOR;

    RETURN RES;
END 

此方案无需额外维护行级函数，所有逻辑集中在一处，适合逻辑复杂度较低的场景。

方案3：使用ILE RPG外部函数（支持真正的行类型传递） #

若允许使用ILE RPG编写外部函数，可利用RPG的%ROWTYPE特性直接接收整行记录，实现真正的单参数传递：

1. 编写RPGLE函数示例 #

在RPG程序中定义接收TESTTABLE行类型的函数，实现求和逻辑（示例简化）：

D ROW_FUNC        PR            10I 0 EXTPROC(*DCLCASE)
D   ROW_DATA                    LIKE(TESTTABLE)

函数体内直接访问ROW_DATA.F1至ROW_DATA.F10完成计算。

2. 在SQL中注册外部函数 #

CREATE OR REPLACE FUNCTION ROWFUNCTION(ROW_DATA TESTTABLE%ROWTYPE) 
RETURNS INT
EXTERNAL NAME 'MYLIB/MYPGM(ROW_FUNC)'
LANGUAGE RPGLE
PARAMETER STYLE SQL;

3. 主函数内调用 #

FOR C CURSOR FOR SELECT * FROM TESTTABLE DO 
    SET RES = RES + ROWFUNCTION(C.*);
END FOR;

这种方式完全无需列出列名，直接传递整行，且复用游标已获取的数据，无二次查表开销。

方案4：用集合操作替代游标循环（性能最优） #

如果你的业务逻辑可以通过SQL集合操作实现（比如示例中的全局求和），可彻底抛弃游标循环，直接用聚合函数完成：

CREATE OR REPLACE FUNCTION DOSOMETHING() RETURNS INT
LANGUAGE SQL 
READS SQL DATA
RETURN (SELECT SUM(F1+F2+F3+F4+F5+F6+F7+F8+F9+F10) FROM TESTTABLE);

此方案性能远高于游标循环，适合无复杂逐行分支逻辑的场景。

内容的提问来源于stack exchange，提问作者AgostinoX