create or replace package types
as
type cursorType is ref cursor;
end;
/ create or replace procedure getemps( p_cursor in out types.cursorType )asbegin open p_cursor for select ename, empno from emp order by ename;end;/
as
type cursorType is ref cursor;
end;
/ create or replace procedure getemps( p_cursor in out types.cursorType )asbegin open p_cursor for select ename, empno from emp order by ename;end;/
解决方案 »
- 请问ORACLE 数据库 有按照模糊表名来查询统计的命令么?
- ORACLE 迁移 在线等!!!!!!!!!!
- 想学习oracle,请大家帮忙推荐几本书吧!
- 关于工作流引擎的问题
- 如何写这个索引
- 如何使用TOAD进行远程oracle管理(如何配置TOAD8.0)?
- 一个困扰多时的问题了,实在没有办法解决,请版主和各位高手相助啊!
- dotnet中的winform如何连接oracle8.0.5
- 求一个Update的语句!!
- 我想求上个月25日16点的时间怎么求啊
- sql中使用的datediff函数,在oracle中又对等函数表示吗?
- 奇怪!sqlplus里一切正常,但dba studio中连接时老报错:tns 连接已关闭
AS
TYPE myrctype IS REF CURSOR; PROCEDURE get (p_id NUMBER, p_rc OUT myrctype);
END pkg_test;
/CREATE OR REPLACE PACKAGE BODY pkg_test
AS
PROCEDURE get (p_id NUMBER, p_rc OUT myrctype)
IS
sqlstr VARCHAR2 (500);
BEGIN
IF p_id = 0 THEN
OPEN p_rc FOR
SELECT ID, NAME, sex, address, postcode, birthday
FROM student;
ELSE
sqlstr :=
'select id,name,sex,address,postcode,birthday
from student where id=:w_id';
OPEN p_rc FOR sqlstr USING p_id;
END IF;
END get;
END pkg_test;
/