CREATE OR REPLACE PACKAGE PKG_SYS_SEARCH is
--定义返回的游标
TYPE VLD_RESULT IS REF CURSOR;
--带返回类型为游标变量的存储过程
PROCEDURE GET_SEARCH_RESULT(SEARCH_CONDITION IN VARCHAR2,RETURN_VAL OUT VLD_RESULT);
END PKG_SYS_SEARCH;
CREATE OR REPLACE PACKAGE BODY
PKG_SYS_SEARCH AS
PROCEDURE GET_SEARCH_RESULT(SEARCH_CONDITION IN
VARCHAR2,RETURN_VAL OUT VLD_RESULT) AS
BEGIN
--设置返回值
OPEN
RETURN_VAL FOR
SELECT *
from SYS_PARAM WHERE TYPE=SEARCH_CONDITION;
END;
END PKG_SYS_SEARCH;