| 使用触发操作 / 将 SPL 例程用作触发操作 | |
CREATE PROCEDURE calc_totpr(old_qty SMALLINT, new_qty SMALLINT,
          total MONEY(8)) RETURNING MONEY(8);
          DEFINE u_price LIKE items.total_price;
          DEFINE n_total LIKE items.total_price;
          LET u_price = total / old_qty;
          LET n_total = new_qty * u_price;
          RETURN n_total;
          END PROCEDURE;
在本示例中,SPL 允许触发器派生不能直接从触发表获得的数据。