--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;