Oracle实践--PL/SQL基础之游标

pl/sql基础入门之游标

pl/sql:过程语言(procedure language)和结构化语言(structured query language)结合而成的语言，是对sql的扩展，支持多种数据类型，如大对象和集合类型，可使用条件和循环等控制语句，可创建存储过程，程序包和触发器等，给sql语句的执行添加程序逻辑，与oracle服务器和oracle工具紧密集成，具有可移植性，灵活性和安全性。

--------------------------------------------------------------------------------------------------------------------------------------
/*
游标：可以用来存放查询结果，逐行提取查询结果，以编程的方式访问数据

类型：1.隐式游标；2.显示游标；3.引用游标

*/

/*

在pl/sql中使用dml语句时自动创建隐式游标

隐式游标自动声明、打开和关闭，其名为 sql

通过检查隐式游标的属性可以获得最近执行的dml语句的信息

隐式游标的属性有：

1.%found – sql语句影响了一行或多行时为 true

2.%notfound – sql语句没有影响任何行时为true

3.%rowcount – sql语句影响的行数

4.%isopen -游标是否打开，始终为false

*/

create or replace procedure sopv(obj varchar2)
as       --定义一个存储过程，用于输出字符串，简化书写
begin
 dbms_output.put_line(obj);
end;

create or replace procedure sopn(obj number)
as       --定义一个存储过程，用于输出number类型
begin
 dbms_output.put_line(obj);
end;

--隐式游标1

declare
 v_ename emp.ename%type;
 v_sq lvarchar2(200);
 v_no number :='&编号：';
begin
  v_sql :='select * from emp where empno =: no';
 execute immediate v_sql using v_no;
 if sql%notfound then--如果没有影响函数，notfound
   sopv('没有找到!');
 elsif sql%found then
   sopn(sql%rowcount);
 end if;
end;

--隐式游标2

declare
 v_name varchar2(20) :='ysjian';
begin
 update emp set ename = v_name where empno =7369;
 if sql%found then
   sopv('更新成功');
   sopn(sql%rowcount);
 elsif sql%notfound then
    sopv('没有找到!');
 end if;
end;

--隐式游标3

declare
    v_emp_rec emp%rowtype;
    v_empno number :='&empno';
begin
    select * into v_emp_rec from emp where empno=v_empno;
    if sql%notfound
       then dbms_output.put_line('没有找到');
    else
       dbms_output.put_line(v_emp_rec.empno||'-->'||v_emp_rec.ename);
    end if;
    exception
      when no_data_found--异常类型，没有找到数据时
        then dbms_output.put_line('data no found exception!');
end;

--显示游标1，关键字，cursor is opoen fetch close

declare
 v_emp emp%rowtype;
 cursor v_cur is--此处与一般的变量声明不同，类型发在名称前面，关键字不能用as，用is
       select *from emp;
begin
 open v_cur;--打开游标
 loop
   fetch v_cur into v_emp;--提取游标
   sopv(v_emp.ename);
   exit when v_cur%notfound;
 end loop;
 close v_cur;--关闭游标
end;

--显示游标2，for循环遍历,打开，提取和关闭游标的操作自动完成

declare
 v_emp emp%rowtype;
 cursor v_cur is select  * from emp;
begin
 for resin v_cur
   loop
     sopv(res.ename);
   end loop;
end；

--显示游标3，带参数

declare
   v_emp emp%rowtype;
   cursor v_cur(parameter varchar2) is select * from emp where ename = parameter;
begin
 for v_res in v_cur('&ename：')
     loop
       sopv(v_res.ename);
     end loop;
end;

--显示游标4：用游标更新数据，关键字：select ... for update

select *from emp;
declare
 v_salnumber;
 cursor emp_cur is select  * from emp where  sal<1500 for update of sal; -- 更新sal字段
begin
 for cin emp_cur
   loop
     v_sal := c.sal;
     update emp set sal = v_sal*1.2 where current of emp_cur;-- 当前游标所指的行
   end loop;
end;

-- ref游标：用于处理运行时动态地执行sql查询

declare
  type emp_ref is ref cursor;--声明一个游标类型，此处又有不同哦
  emp_cur emp_ref;--声明一个游标，类型是上面定义好的类型
  v_emp emp%rowtype;
  v_sal number :='&输入薪水：';
begin
  open emp_cur for 'select * from emp where sal>:s'--此处可以是字符串，也就是可以动态传值的
  using v_sal;--给占位符绑值
  loop
    fetch emp_cur into v_emp;
    exit when emp_cur%notfound;
    sopv(v_emp.ename);
  end loop;
  close emp_cur;
end;

给游标简单的做个小结

1.游标用于处理查询结果集中的数据

2.游标类型有：隐式游标、显式游标和 ref游标

3.隐式游标由 pl/sql自动定义、打开和关闭

4.显式游标用于处理返回多行的查询

5.显式游标可以删除和更新活动集中的行

6.要处理结果集中所有记录时，可使用循环游标

7.在声明 ref游标时，不需要将 select语句与其关联

*/

文章来源：https://blog.csdn.net/ysjian_pingcx/article/details/25645515接