DB2 存储过程应用（返回值和输出参数应用）

我弄了小半天才弄出来，希望对有需要的朋友有所帮助和提示。欢迎光临如转载请说明出处。
DROP SPECIFIC PROCEDURE DB2INST1.SQL121129100123456;

#SYNC 10;

SET SCHEMA TYCOON_SP;

SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","NORTHTYCOON";

CREATE PROCEDURE DB2INST1.SP_UP_P_INV_WASTE
 (IN "IN_CREATE_WHEN" DATE,
  IN "IN_NAME" CHARACTER(20),
  IN "IN_SCHOOL" SMALLINT,
  IN "IN_TIME" TIMESTAMP,
  IN "IN_ID" INTEGER,
  OUT "OUT_NUM" INTEGER
 )
  SPECIFIC DB2INST1.SQL121129100123456
  LANGUAGE SQL
  NOT DETERMINISTIC
  CALLED ON NULL INPUT
  EXTERNAL ACTION
  OLD SAVEPOINT LEVEL
  MODIFIES SQL DATA
  INHERIT SPECIAL REGISTERS
  P1: BEGIN
--DECLARE RESULTCOUNT CURSOR WITH RETURN FOR
 DECLARE NUM INTEGER;
 DECLARE OUT_COUNT INTEGER;
 
     SET OUT_COUNT = 0;
     SET NUM=(SELECT COUNT(1)  from(
                SELECT * FROM TABLE_CHOOL
 ) as TB);
--OPEN RESULTCOUNT;

IF (0 = NUM) THEN
   P2: BEGIN
      SET OUT_COUNT = 1;
      UPDATE TABLE_CHOOL
      SET CREATE_WHEN = IN_CREATE_WHEN,NAME =IN_NAME,SCHOOL=IN_SCHOOL,TIME=IN_TIME,
      WHERE ID=IN_ID;
   END P2;
ELSEIF (1<= NUM) THEN
    SET OUT_COUNT = 999;
END IF;
    SET OUT_NUM = OUT_COUNT;
RETURN OUT_NUM;


END P1;

#SYNC 20;