--create by
luwenbing
--2014/2/27
--查找用户所在科室下的所有已签收的检品,再根据检品的检项是否分配给用户去筛选
CREATE OR
REPLACE PROCEDURE eln_Sample_GetSampleInfo
(
p_starter IN
varchar2(10),
p_SampleCursor OUT
pkg_query.cur_query
)
AS
v_Sql
CLOB;
BEGIN
v_Sql:=‘‘;
EXCEPTION
WHEN OTHERS THEN
v_Sql:=‘‘;
END;
--执行SQL并返回
IF v_Sql IS NOT NULL
THEN
OPEN p_SampleCursor FOR v_Sql;
END
IF;
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE(SQLCODE || ‘---‘ || SQLERRM);
END;
原文:http://www.cnblogs.com/wenbing/p/3583861.html