Oracle 游标分类以及实例

/*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;