Oracle中的游标和函数

1.游标

游标是一种 PL/SQL 控制结构；可以对 SQL 语句的处理进行显示控制，便于对表的行数据
逐条进行处理。 游标并不是一个数据库对象，只是存留在内存中。
操作步骤：
   声明游标
   打开游标
   取出结果，此时的结果取出的是一行数据
   关闭游标 到底那种类型可以把一行的数据都装进来
   此时使用 ROWTYPE 类型，此类型表示可以把一行的数据都装进来。 例如：查询雇员编号为 7369 的信息（肯定是一行信息）。
例：查询雇员编号为 7369 的信息（肯定是一行信息）。

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 循环操作游标（比较常用）

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隐式的帮我们完成了。  

编写第一个游标，输出全部的信息。

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;

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 ;

注意 1： 在打开游标之前最好先判断游标是否已经是打开的。
通过 ISOPEN 判断
格式：

游标%ISOPEN IF mycur%ISOPEN THEN
null ; 
ELSE 
OPEN mycur ; 
END IF ;

注意 2：可以使用 ROWCOUNT 对游标所操作的行数进行记录。

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.函数

函数就是一个有返回值的过程。
定义一个函数：此函数可以根据雇员的编号查询出雇员的年薪

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 ;

直接写 SQL 语句，调用此函数：

SELECT myfun(7369) FROM dual ;

写一个函数  输入一个员工名字，判断该名字在员工表中是否存在。存在返回 1，不存在返回 0

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;