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;