CREATE OR REPLACE PACKAGE pkg_test
AS
TYPE myrctype IS REF CURSOR;
END pkg_test;
/CREATE PROCEDURE Reserve (isbn varchar2,ydrq1 date,ydrq2 date,p_rc pkg_test.myrctype)
AS
misbn varchar2(20);
str varchar2(100);
begin
misbn:='%'||trim(isbn)||'%';
str:='SELECT a.*
from lib_cb a
where a.isbn like decode('||isbn||',null,a.isbn,'||misbn||')
and ydrq>='||ydrq1||' and ydrq<='||ydrq2||'
and cgrq is null';
open p_rc for str;
end;
/
AS
TYPE myrctype IS REF CURSOR;
END pkg_test;
/CREATE PROCEDURE Reserve (isbn varchar2,ydrq1 date,ydrq2 date,p_rc pkg_test.myrctype)
AS
misbn varchar2(20);
str varchar2(100);
begin
misbn:='%'||trim(isbn)||'%';
str:='SELECT a.*
from lib_cb a
where a.isbn like decode('||isbn||',null,a.isbn,'||misbn||')
and ydrq>='||ydrq1||' and ydrq<='||ydrq2||'
and cgrq is null';
open p_rc for str;
end;
/
CREATE PROCEDURE Reserve (isbn varchar2,ydrq1 date,ydrq2 date,p_rc out pkg_test.myrctype) 还出现问题吗?