1、简介
存储过程（Stored Procedure）是一组为了完成特定功能的SQL语句集，经编译后存储在数据库中。用户通过指定存储过程的名字并给出参数（如果该存储过程带有参数）来执行它。存储过程是数据库中的一个重要对象，任何一个设计良好的数据库应用程序都应该用到存储过程。
存储过程是由流控制和SQL语句书写的过程，这个过程经编译和优化后存储在数据库服务器中，应用程序使用时只要调用即可。
2、重要概念和疑问解答
1）何谓informix中的SPL？
SPL（Stored Procedure Language）是informix中提供的一种提供流程控制（分支和循环）的SQL。它包括SPL过程（没有返回值）和SPL函数（有返回值）。SPL将在创建的时候被解析和优化，它以可执行的方式保存在system catalog表中。
2）使用SPL为什么会改善性能？
i）因为它运行在informix引擎中，所以减少了I/O；
ii）降低了应用的复杂性；
iii）对频率较高的重复操作使用更好。
3）SPL的灵活性表现在哪些部分？
i）它可在其它SQL语法中被调用；
ii）它也可以在触发器中使用；
iii）可在SQL中添加流程控制；
iv）很容易维护。
4）SPL的参数
i）可以传递很多个参数；
ii）SPL的参数的最大限制是32K；
iii）除了如下两种外可以是任何一种SQL数据类型：
Serial/Serial8
Text/Byte (能够使用REFERENCES关键字传递)。
iv）能够使用很复杂或者用户自定义的数据类型；
v）可以通过default为参数指定默认值。
5）SPL函数的返回值
i）可以使用RETURNING或RETURNS关键字定义返回值的返回类型；
ii）除了如下两种数据类型外可以为任何数据类型：
Serial/Serial8
Text/Byte (可以使用REFERENCES关键字传递)。
iii）在过程体内必须至少有一个return语句；
iv）可以为返回值取一个名称。
例如：
RETURNING INTEGER AS comp_res;
6）SPL的重载
可定义多个具有相同名字的SPL函数；例如如下SPL函数虽然名称相同，但是参数类型或各不相同：
CREATE FUNCTION val_comp (val1 INTEGER, val2 INTEGER)
CREATE FUNCTION val_comp (val1 CHAR(25), val2 CHAR(25))
CREATE FUNCTION val_comp (val1 DECIMAL, val2 DECIMAL)
…
可使用SPECIFIC关键字指定SPL函数的简短的、独一无二的被重载的SPL的函数的名称。这个名字在数据库中是唯一的。
例如：
CREATE FUNCTION val_comp (val1 INTEGER, val2 INTEGER) SPECIFIC int_comp
CREATE FUNCTION val_comp (val1 CHAR(25), val2 CHAR(25)) SPECIFIC string_comp
CREATE FUNCTION val_comp (val1 DECIMAL, val2 DECIMAL) SPECIFIC dec_comp
7）何谓语句块？
i）语句块是一组SPL或SQL语句；
ii）隐式的语句块包含在CREATE PROCEDURE/FUNCTION和END PROCEDURE/FUNCITON之间；
iii）可使用BEGIN和END来显式的知名内嵌在另一个语句块中的语句块，例如：
CREATE PROCEDURE myproc1() -- 隐式的语句块的开始
DEFINE x INT;
LET x = 15;
INSERT INTO table1 VALUES (x, 'amigo');
BEGIN -- 显式的语句块的开始
DEFINE y INT;
LET y = 16;
INSERT INTO table1 VALUES ( y, 'xingxing');
END -- 显式的语句块的结束
END PROCEDURE; -- 隐式的语句块的结束
8）如何定义变量？
i）是语句块中使用DEFINE定义变量；
ii）变量在内存中，而不是在数据库中保存；
iii）有本地变量和全局变量两种；
iv）变量可以是除了如下两种类型之外的任何一种SQL数据类型和扩展类型：
Serial/Serial8
Text/Byte (可以使用REFERENCES关键字来声明)。
定义变量举例如下：
DEFINE x, y INT; -- 内建的数据类型
DEFINE p person_type; -- 用户自定义的数据类型person_type
DEFINE mymusic REFERENCES BYTE; -- 使用REFERENCES关键字定义BYTE类型
9）本地变量和全局变量比较
本地变量：
i）本地变量值在SPL中有效；
ii）在SPL函数或过程结束后就被复位；
iii）它不能有默认值；
iv）它的作用域是在它定义的语句块中，或者任何内嵌语句块中；
v）本地变量能够被重新定义在另一个语句块中。
下面来看一个本地变量的实例：
CREATE PROCEDURE local_scope()
DEFINE x,y,z INT;
LET x = 5;
LET y = 10;
LET z = x + y; -- z等于15
BEGIN
DEFINE x, q INT; -- x被重新定义
DEFINE z CHAR(5); -- z被重新定义
LET x = 100;
LET q = x + y; -- q=110
LET z = 'amigo'; -- 给z设置了一个新的值
END
LET y = x; -- y等于5
LET x = z; -- z的值是15，而不是amigo
END PROCEDURE;
全局变量：
i）在相同数据库中使用相同的用户会话的地方都能得到全局变量的值；
ii）必须有一个默认值；
iii）必须在每一个要使用它的SPL函数或过程中定义；
iv）不能是一个集合变量。
例如如下定义了两个SPL函数，名称分别为func1和func2，func1参考语句如下：
CREATE FUNCTION func1() RETURNING INT;
DEFINE GLOBAL gvar INT DEFAULT 2;
LET gvar = gvar + 1;
RETURN gvar;
END FUNCTION;
func2参考语句如下：
CREATE FUNCTION func2()RETURNING INT;
DEFINE GLOBAL gvar INT DEFAULT 5;
LET gvar = gvar + 1;
RETURN gvar;
END FUNCTION;
如果执行两者的顺序如下：
EXECUTE FUNCTION func1();
EXECUTE FUNCTION func2();
则执行完第一句后，gvar被设置了默认值2，且执行了加1的操作，所以第一句执行完毕后gvar的值为3.
接着执行第二句，第这次不在设置gvar的默认值，因此在3的基础上再执行了加1操作，执行完毕后gvar的值为4.
若执行两者的顺序如下：
EXECUTE FUNCTION func2();
EXECUTE FUNCTION func1();
则执行完第一句后，gvar被设置了默认值5，且执行了加1的操作，所以第一句执行完毕后gvar的值为6.
接着执行第二句，第这次不在设置gvar的默认值，因此在6的基础上再执行了加1操作，执行完毕后gvar的值为7.
10）给变量赋值
i）使用一个未定义的变量将会报错；
ii）给已定义的变量赋值的方法：
* 使用LET语句直接给变量赋初值，参考语句如下：
LET <变量> = <有效的表达式或函数名>;
*使用SELET INTO语句将查询到的结果给变量赋值，参考语句如下：
SELECT … INTO <变量> FROM …;
*使用CALL...RETURNING语句将返回结果赋给变量，参考语句如下：
CALL … RETURNING <变量>;
*使用EXECUTE FUNCTION INTO语句，将返回结果赋给变量，参考语句如下：
EXECUTE FUNCTION … INTO <变量>;
3、语法
1）创建SPL过程
CREATE PROCEDURE name (parameter list) SPECIFIC specific_name
… {语句块}
END PROCEDURE;
例如，在下面的实例中创建了一个名为set_status的存储过程，可传入myid和mystatus两个参数，在这个存储过程中，对item_inventory表进行update操作，id字段满足myid的记录将status字段更新为mystatus。参考语句如下：
CREATE PROCEDURE set_status (myid INTEGER DEFAULT 0, mystatus CHAR(25))
UPDATE item_inventory SET status = mystatus WHERE id = myid;
END PROCEDURE;
2）创建SPL函数
CREATE FUNCTION name (parameter list)
RETURNING list SPECIFIC specific_name
… {语句块}
END FUNCTION;
例如，创建一个名为val_comp的SPL函数，可传入val1和val2两个参数，在该函数中，比较这两个变量，如果两者相等，返回0，否则返回1。参考语句如下：
CREATE FUNCTION val_comp (val1 INTEGER, val2 INTEGER)
RETURNING INTEGER;
DEFINE res INTEGER;
IF (val1 = val2) THEN
LET res = 0;
ELSE
LET res = 1;
END IF;
RETURN res;
END FUNCTION;
4、SPL中的流程控制
1）分支语句if...then...else...end if
参考实例：
IF ( condition ) THEN
statements
ELIF ( condition ) THEN
statements
…
ELSE
statements
END IF;
2）分支语句case
参考实例：
CASE ( condition )
WHEN <value1> THEN
statements
WHEN <value2> THEN
statements
…
ELSE
statements
END CASE;
3）循环语句for
参考语法如下：
FOR 变量 IN ( 范围或值 )
或者使用如下语法：
FOR 变量=范围
举例如下：
FOR count = 2 TO 30
FOR count = 2 TO 30 STEP 2
FOR count IN ( 2, 5, 7, 9)
FOR count IN ( 2 to 8 STEP 2, 12 to 19, 22)
FOR name IN ("AMY", "MAX",
(SELECT name FROM customer WHERE customer_num = 100) )
4）循环语句while
参考语法如下所示：
WHILE (条件表达式)
执行的语句
END WHILE;
while中的条件表达式的举例如下：
WHILE (count < 20)
WHILE (status matches "A*")
WHILE (EXISTS (SELECT name FROM customer WHERE cus_num=100))
WHILE (status IN ("A", "I", "D"))
5）循环语句foreach
i）被用来取多行数据；
ii）它打开了一个游标；
iii）游标用来取得当前的行，以便进行行的更新或删除操作。
参考实例如下：
FOREACH SELECT salary INTO ind_sal
FROM customer
WHERE location = “UK"
sum_sal += ind_sal;
END FOREACH;
RETRUN sum_sal;
6）continue或exit语句
都可以被使用在for、foreach和while循环语句中。
参考实例如下：
FOR i = 1 TO 5
LET j = i;
WHILE (j > 0)
LET id = foo(j);
IF (id = 5) THEN
LET j = j – 1;
CONTINUE WHILE; -- 不执行后续的操作，继续回到while循环接着执行
END IF;
LET sum = sum + 5;
LET j = j – 1;
IF (sum > 500) THEN
EXIT FOR; -- 退出for循环
END IF;
END WHILE;
END FOR;
RETURN sum;
5、异常处理
1）ON EXCEPTION语句
ON EXCEPTION语句语句提供了异常的捕获和处理机制。在IN中指定要捕获的错误，并指定当异常发生时需要执行的动作。在一个语句块中允许有多个ON EXCEPTION语句。
ON EXCEPTION语句必须在DEFINE语句之后，并在在任何可执行的语句块之前。并且它在内嵌的语句块中也是有效的。它使用SET语句来接收SQL、ISAM错误码和错误信息。
参考实例如下所示：
CREATE PROCEDURE ex_test()
DEFINE sql_err INTEGER;
DEFINE isam_err INTEGER;
DEFINE err_txt CHAR(200);
ON EXCEPTION IN (-206) SET sql_err, isam_err, err_txt
CREATE TABLE tab1 ( col1 INT, col2 INT);
INSERT INTO tab1 VALUES (1, 2);
INSERT INTO tab1 VALUES (2, 3);
END EXCEPTION
INSERT INTO tab1 VALUES (1, 2); --如果tab1不存在时，跳到异常处理
INSERT INTO tab1 VALUES (2, 3);
END PROCEDURE;
2）WITH RESUME语句
该语句在存储过程发生错误时恢复语句。
如下实例展示了WITH RESUME的使用，当异常处理完毕后，继续后续的语句处理。参考语句如下：
CREATE PROCEDURE ex_test()
ON EXCEPTION IN (-206)
CREATE TABLE tab1 (col1 INT, col2 INT);
INSERT INTO tab1 VALUES (1, 2);
END EXCEPTION WITH RESUME;
INSERT INTO tab1 VALUES (1, 2); -- 如果tab1不存在，跳到异常处理
INSERT INTO tab1 VALUES (2, 3); -- 异常处理完成后，继续该句进行处理
INSERT INTO tab1 VALUES (3, 4);
END PROCEDURE;
3）RAISE EXCEPTION语句
i） 该语句用来创建错误；
ii）它能够用来指定SQL错误、ISAM错误和错误信息；
iii）用该语句创建的错误，能够被ON EXCEPTION捕获；
iv）可以使用指定的错误码-746来表示自定义的错误消息。
如下实例使用ON EXCEPTION语句指明了当发生错误时将错误码、错误信息插入到自定义的错误表my_error_table，当传入的参数小于1时，抛出自定义的-746异常，其余情况成功将数据插入到tab1表中，参考语句如下：
CREATE PROCEDURE ex_test5 (a INT)
DEFINE sql_err INTEGER;
DEFINE isam_err INTEGER;
DEFINE err_txt CHAR(200);
ON EXCEPTION IN (-746) SET sql_err, isam_err, err_txt
INSERT INTO my_error_table values (sql_err, isam_err, err_txt);
END EXCEPTION;
IF (a < 1) THEN
RAISE EXCEPTION -746, 0, "插入值必须大于0";
END IF;
INSERT INTO tab1 VALUES (1, a);
END PROCEDURE;
6、执行SPL函数或存储过程
可使用EXECUTE PROCEDURE语句来执行SPL存储过程，使用EXECUTE FUNCTION来执行SPL函数；
参考实例1：
EXECUTE PROCEDURE foo();
参考实例2：
CREATE FUNCTION func1() RETURNING INT
DEFINE myvalue INT;
CALL foo() RETURNING myvalue;
INSERT INTO table1 VALUES (myvalue);
RETURN myvalue;
END FUNCTION;
参考实例3：
SELECT * FROM table2 WHERE id = get_id("amigo");
参考实例4：
UPDATE table2 SET col2=foo() WHERE id=1;
7、删除SPL函数或存储过程
1）使用DROP PROCEDURE来删除SPL存储过程；
2）使用DROP FUNCTION来删除SPL函数；
3）使用DROP ROUTINE来删除SPL存储过程或SPL函数。
几个参考实例如下：
DROP PROCEDURE foo;
DROP PROCEDURE foo (INTEGER);
DROP SPECIFIC PROCEDURE foo_int;
DROP FUNCTION foo_ret;
DROP FUNCTION foo_ret (INTEGER);
DROP SPECIFIC FUNCTION foo_ret_int;
DROP ROUTINE foo;
DROP ROUTINE foo_ret;