--声明包头
CREATE OR REPLACE PACKAGE PACK_TEST
AS
--这个是游标
TYPE TESTCUR IS REF CURSOR;
--这个是过程
PROCEDURE sp_test1
(EXAMID in VARCHAR2,
P_CUR OUT TESTCUR
);
END PACK_TEST;
/
--声明包体
CREATE OR REPLACE PACKAGE BODY PACK_TEST
AS
PROCEDURE ReturnTable
(EXAMID in VARCHAR2,
P_CUR OUT TESTCUR)
IS
strsql varchar2(1000);
BEGIN
strsql:='select * from TB_EXAM where examid=:'||EXAMID||'';
open p_cur for strsql using EXAMID;--上一句的:及这一句为绑定变量
end ReturnTable;
END PACK_TEST;
/
急求,谢谢大家
F5 执行 包头 成功了
然后 F5 执行包体,就 提示Warning: compiled but with compilation errors。
然后 包体 第一行 显示红色了。
不好意思,新用户还没有C币