create or relpace produce 过程名字 (
入参 类型,
返回值 类型
(例如:
in_id VARCHAR2,
out_list OUT NOCOPY SYS_REFCURSOR, --
0ut_code OUT NUMBER,
out_msg OUT VARCHAR2)
)IS
BEGIN
out_code := 1;
out_msg := 'success';
--预先打开游标,以防出现空游标
OPEN out_baseinfo FOR
SELECT 1
FROM dual
HERE 1 = 2;
open out_list FOR
SELECT 字段。。。 FROM 表名
where 条件;
EXCEPTION
WHEN OTHERS THEN
out_code := -1;
out_msg := 'Query Failed!';
END;