/*Oracle游标,从字面理解就是游动的光标。用数据库语言来描述就是:游标是映射在结果集中一行数据上的位置实体,
有了游标,用户就可以访问结果集中的任意一行数据了,将游标放置到某行后,即可对该行数据进行操作,例如提取当前行的数据等。
*/
/*游标分类:
A. 静态游标:
分为显式游标和隐式游标。
B. REF游标:
是一种引用类型,类似于指针。
*/
--隐式游标:不用明确建立游标变量,分两种:
--1.在PL/SQL中使用DML语言,自身存在的游标,处理返回单行语句,不用创建,默认名称是小写sql
--2.CURSOR FOR LOOP,用于for loop 语句, 返回多行查询
--显式和隐式游标的区别:
--尽量使用隐式游标,避免编写附加的游标控制代码(声明,打开,获取,关闭),
--也不需要声明变量来保存从游标中获取的数据。
create or replace procedure getDirectSubTree(rooter in String) as
TYPE cur_type IS REF CURSOR;
c_tab cur_type;
v_id STRING(2000);
v_parentId STRING(3000);
v_name STRING(3000);
v_sql STRING(3000);
v_count number;
----------------------------显示游标---------------------
--声明一个游标 它的类型是这个表里的列的类型
cursor xianshi_cursor
is select id,name from dept;
begin
----------------------显示游标 loop 循环, 创建变量给值------------------------
open xianshi_cursor;
loop
fetch xianshi_cursor into v_id, v_name;
exit when xianshi_cursor%notfound;
if v_id = 1 then
update dept set name = '' where 1 = 2;
end if;
dbms_output.put_line(v_id || '-----显示游标loop循环,创建变量给值-------' || v_name);
commit;
end loop;
close xianshi_cursor;
----------------------显示游标 for 循环, 无需创建变量给值------------------------
for a in xianshi_cursor
loop
dbms_output.put_line(a.id || '-----显示游标for循环, 无需创建变量给值---' || a.name);
end loop;
----------------------隐式游标 第一种:例子1------------------------
declare
begin
update dept set name = '' where 1 = 2;
dbms_output.put_line('隐式游标: 用sql%found ');
if sql%found then
dbms_output.put_line('ok--------------');
dbms_output.put_line('更新了 '|| sql%rowcount ||' 个记录'); --返回更新的行数
end if ;
if sql%notfound then
dbms_output.put_line('no--------------');
dbms_output.put_line('更新了 '|| sql%rowcount ||' 个记录'); --返回更新的行数
end if;
exception
when no_data_found then
dbms_output.put_line('no data found');
end;
----------------------隐式游标 第一种:例子2------------------------
declare
var_name dept.name%type;
var_id dept.id%type;
begin
select name into var_name from dept where id=1;
select id into var_id from dept where id=1;
dbms_output.put_line('隐式游标: var_name dept.name%type ');
dbms_output.put_line('id='||var_id || 'name='||var_name);
exception
when no_data_found then
dbms_output.put_line('no data found');
end;
----------------------隐式游标 第二种:------------------------
declare
begin
for my_dept_rec in (select id, name from dept)
loop
dbms_output.put_line(my_dept_rec.id || ' : ' || my_dept_rec.name);
end loop;
end;
-----------------------REF游标-------------------------------------
if not c_tab %isopen then
OPEN c_tab FOR
select id, parent_id, name from dept where id = rooter;
end if;
LOOP
FETCH c_tab
INTO v_id, v_parentId, v_name;
EXIT WHEN c_tab%NOTFOUND;
dbms_output.put_line(v_name);
END LOOP;
v_sql := ' insert into dept values(100, 0, ''sfsdfsd'') ';
EXECUTE IMMEDIATE v_sql;
select count(*) into v_count from dept;
dbms_output.put_line(v_count);
if c_tab %isopen then
close c_tab;
end if;
end getDirectSubTree;
Oracle 游标分类以及实例
最新推荐文章于 2023-05-11 21:59:47 发布