DB2 带参数存储过程测试

--DB2 带参数存储过程测试
--彭建军
--2006-1-4 9:27

--建立测试环境
DROP TABLE T1;

DROP PROCEDURE P1;

CREATE TABLE T1(C1 VARCHAR(20));

CREATE PROCEDURE DB2ADMIN.P1(IN IsFirstRun INT)
LANGUAGE SQL
BEGIN
  INSERT INTO T1(C1)
    VALUES(
            CASE IsFirstRun
              WHEN 0 THEN 'IsFirstRun'
              ELSE 'IsNotFirstRun'
            END
          );
END

--执行存储过程
CALL P1(0);

CALL P1(1);

--结果集
IsFirstRun
IsNotFirstRun