创建返回结果集的函数
SQL> create or replace package pkg_HelloWorld as
2 -- 定义ref cursor类型
3 type myrctype is ref cursor;
4 --函数申明
5 function getHelloWorld return myrctype;
6 end pkg_HelloWorld;
7 /
程序包已创建。
SQL> CREATE OR REPLACE package body pkg_HelloWorld as
2 function getHelloWorld return myrctype
3 IS
4 return_cursor myrctype;
5 BEGIN
6 OPEN return_cursor FOR
7 SELECT 'Hello 1' AS a, 'World 1' AS B FROM dual
8 UNION ALL
9 SELECT 'Hello 2' AS a, 'World 2' AS B FROM dual;
10 return return_cursor;
11 END getHelloWorld;
12 end pkg_HelloWorld;
13 /
程序包体已创建。
注:Oracle 这里的函数,是一个返回游标类型的函数, 不是像 SQL Server 的那种叫 “表值函数” 的东西。
因此下面的写法会报错。
SQL> SELECT * FROM pkg_HelloWorld.getHelloWorld();
SELECT * FROM pkg_HelloWorld.getHelloWorld()
*
第 1 行出现错误:
ORA-00933: SQL 命令未正确结束
SQL> SELECT pkg_HelloWorld.getHelloWorld() FROM dual;
PKG_HELLOWORLD.GETHE
--------------------
CURSOR STATEMENT : 1
CURSOR STATEMENT : 1
A B
------- -------
Hello 1 World 1
Hello 2 World 2
整张表,用游标循环输出吧。
dept表有三个字段(deptno,dname,loc)
create or replace procedure p_1
as
begin
declare
cursor cursor_dept is select * from scott.dept;
row_dept scott.dept%rowtype;
begin
for row_dept in cursor_dept loop
dbms_output.put_line(row_dept.deptno);
dbms_output.put_line(row_dept.dname);
dbms_output.put_line(row_dept.loc);
end loop;
end;
end p_1;
commit;
set serveroutput on;
exec p_1;
这个过程只是个例子,具体的条件要求可以修改过程。