关于存储过程

Question

可以在存储过程的变量定义中定义一个游标，然后在这个存储过程的输出变量里加入这个游标的值就可以了，具体的例子有很多的，上网找找就行了。

Answer 1

CREATE OR REPLACE PACKAGE pkg_test
AS
  TYPE myrctype IS REF CURSOR;  PROCEDURE get (p_id NUMBER, p_rc OUT myrctype);
END pkg_test;
/CREATE OR REPLACE PACKAGE BODY pkg_test
AS
  PROCEDURE get (p_id NUMBER, p_rc OUT myrctype)
  IS
     sqlstr   VARCHAR2 (500);
  BEGIN
     IF p_id = 0 THEN
        OPEN p_rc FOR
           SELECT ID, NAME, sex, address, postcode, birthday
             FROM student;
     ELSE
        sqlstr :=
           'select id,name,sex,address,postcode,birthday
          from student where id=:w_id';
        OPEN p_rc FOR sqlstr USING p_id;
     END IF;
  END get;
END pkg_test;