Oracle中的游标和函数详解
1.游标
游标是一种 PL/sql 控制结构；可以对 sql 语句的处理进行显示控制，便于对表的行数据
逐条进行处理。 游标并不是一个数据库对象，只是存留在内存中。
操作步骤：
声明游标
打开游标
取出结果，此时的结果取出的是一行数据
关闭游标 到底那种类型可以把一行的数据都装进来
此时使用 ROWTYPE 类型，此类型表示可以把一行的数据都装进来。 例如：查询雇员编号为 7369 的信息（肯定是一行信息）。
例：查询雇员编号为 7369 的信息（肯定是一行信息）。
rush:sql;">
DECLARE
eno emp.empno%TYPE ;
empInfo emp%rOWTYPE ;
BEGIN
eno := &en ;
SELECT * INTO empInfo FROM emp WHERE empno=eno ;
DBMS_OUTPUT.put_line('雇员编号：'||empInfo.empno) ;
DBMS_OUTPUT.put_line('雇员姓名：'||empInfo.ename) ;
END ;
使用 for 循环操作游标（比较常用）
rush:sql;">
DECLARE
-- 声明游标
CURSOR mycur IS SELECT * FROM emp where empno=-1;
empInfo emp%rOWTYPE ;
cou NUMBER ;
BEGIN
-- 游标操作使用循环，但是在操作之前必须先将游标打开
FOR empInfo IN mycur
LOOP
--ROWCOUNT 对游标所操作的行数进行记录
cou := mycur%rOWCOUNT ;
DBMS_OUTPUT.put_line(cou||'雇员编号：'||empInfo.empno) ;
DBMS_OUTPUT.put_line(cou||'雇员姓名：'||empInfo.ename) ;
END LOOP ;
END ;
我们可以看到游标FOR循环确实很好的简化了游标的开发，我们不在需要open、fetch和close语句，不在需要用%FOUND属性检测是否到最后一条记录，这一切Oracle隐式的帮我们完成了。
rush:sql;">
DECLARE
-- 声明游标
CURSOR mycur IS SELECT * FROM emp ; -- 相当于一个List (EmpPo)
empInfo emp%rOWTYPE ;
BEGIN
-- 游标操作使用循环，但是在操作之前必须先将游标打开
OPEN mycur ;
-- 使游标向下一行
FETCH mycur INTO empInfo ;
-- 判断此行是否有数据被发现
WHILE (mycur%FOUND)
LOOP
DBMS_OUTPUT.put_line('雇员编号：'||empInfo.empno) ;
DBMS_OUTPUT.put_line('雇员姓名：'||empInfo.ename) ;
-- 修改游标，继续向下
FETCH mycur INTO empInfo ;
END LOOP ;
END ;
也可以使用另外一种方式循环游标：LOOP…END LOOP;
rush:delphi;">
DECLARE
-- 声明游标
CURSOR mycur IS SELECT * FROM emp ;
empInfo emp%rOWTYPE ;
BEGIN
-- 游标操作使用循环，但是在操作之前必须先将游标打开
OPEN mycur ;
LOOP
-- 使游标向下一行
FETCH mycur INTO empInfo ;
EXIT WHEN mycur%NOTFOUND ;
DBMS_OUTPUT.put_line('雇员编号：'||empInfo.empno) ;
DBMS_OUTPUT.put_line('雇员姓名：'||empInfo.ename) ;
END LOOP ;
END ;
通过 ISOPEN 判断
格式：
rush:sql;">
游标%ISOPEN IF mycur%ISOPEN THEN
null ;
ELSE
OPEN mycur ;
END IF ;
rush:sql;">
DECLARE
-- 声明游标
CURSOR mycur IS SELECT * FROM emp ;
empInfo emp%rOWTYPE ;
cou NUMBER ; BEGIN
-- 游标操作使用循环，但是在操作之前必须先将游标打开
IF mycur%ISOPEN THEN
null ;
ELSE
OPEN mycur ;
END IF ;
LOOP
-- 使游标向下一行
FETCH mycur INTO empInfo ;
EXIT WHEN mycur%NOTFOUND ;
cou := mycur%rOWCOUNT ;
DBMS_OUTPUT.put_line(cou||'雇员编号：'||empInfo.empno) ;
DBMS_OUTPUT.put_line(cou||'雇员姓名：'||empInfo.ename) ;
END LOOP ;
END ;
2.函数
rush:sql;">
CREATE OR REPLACE FUNCTION myfun(eno emp.empno%TYPE)
RETURN NUMBER AS rsal NUMBER ;
BEGIN
SELECT (sal+nvl(comm,0))*12 INTO rsal FROM emp WHERE empno=eno ;
RETURN rsal ;
END ;
rush:sql;">
SELECT myfun(7369) FROM dual ;
写一个函数 输入一个员工名字，判断该名字在员工表中是否存在。存在返回 1，不存在返回 0
rush:sql;">
create or replace function empfun(en emp.ename%type)
return number as is_exist number;
begin
select count(*) into is_exist from emp where ename=upper(en);
return is_exist;
end;
感谢阅读，希望能帮助到大家，谢谢大家对本站的支持！
原文地址：https://www.jb51.cc/oracle/64869.html
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。
