1. -- 定义游标是,可以返回多个列:使用变量处理
DECLARE
CURSOR CUR_EMP IS SELECT P.EMPNO,P.ENAME FROM SCOTT.EMP P; ----声明显示游标
T_EMPNO SCOTT.EMP.EMPNO%TYPE;
T_ENAME SCOTT.EMP.ENAME%TYPE;
BEGIN
OPEN CUR_EMP;
LOOP
FETCH CUR_EMP INTO T_EMPNO,T_ENAME; -- 注意Fetch可以依次将多列数据放入到变量中
EXIT WHEN CUR_EMP%NOTFOUND ;
DBMS_OUTPUT.put_line(T_EMPNO);
DBMS_OUTPUT.put_line(T_ENAME);
END LOOP;
CLOSE CUR_EMP;
END;
2.-- 定义游标是,可以返回多个列 : 使用RowType进行处理
DECLARE
CURSOR CUR_EMP IS SELECT * FROM SCOTT.EMP P; -->必须返回整个表中的所有 列方可与T_EMP 匹配
T_EMP SCOTT.EMP%ROWTYPE;
BEGIN
OPEN CUR_EMP;
LOOP
FETCH CUR_EMP INTO T_EMP; -- 注意Fetch可以依次将多列数据放入到变量中
EXIT WHEN CUR_EMP%NOTFOUND ;
DBMS_OUTPUT.put_line(T_EMP.EMPNO);
DBMS_OUTPUT.put_line(T_EMP.ENAME);
END LOOP;
CLOSE CUR_EMP;
END;
3.-- 定义含有参数的游标(参数类型和存储过程一样,不能指定大小)
DECLARE
CURSOR CUR_EMP(T_NO VARCHAR2) IS SELECT P.EMPNO,P.ENAME FROM SCOTT.EMP P WHERE
-- 注释:参数的类型还可以为scott.emp.empno%type也是可以的
P.EMPNO = T_NO;
T_EMPNO SCOTT.EMP.EMPNO%TYPE;
T_ENAME SCOTT.EMP.ENAME%TYPE;
BEGIN
OPEN CUR_EMP('7369'); -- 传入参数到游标中
LOOP
FETCH CUR_EMP INTO T_EMPNO,T_ENAME;
EXIT WHEN CUR_EMP%NOTFOUND ;
DBMS_OUTPUT.put_line(T_EMPNO);
DBMS_OUTPUT.put_line(T_ENAME);
END LOOP;
CLOSE CUR_EMP;
END;
4.-- 定义动态游标
DECLARE
TYPE CUR_REF IS REF CURSOR ; -- A 声明REF游标类型
CUR_EMP CUR_REF; -- B 声明REF游标类型的变量
T_EMP SCOTT.EMP%ROWTYPE;
T_SQL VARCHAR2(4000);
BEGIN
T_SQL:='';
T_SQL := T_SQL || 'SELECT * FROM SCOTT.EMP '; -- C 拼接sql语句(可拼接表名、条件、列名等)
OPEN CUR_EMP FOR T_SQL; -- D 动态执行sql
--注意:for后也可以直接跟sql: open cur_emp form select * from emp ;
LOOP
FETCH CUR_EMP INTO T_EMP; -- 注意Fetch可以依次将多列数据放入到变量中
EXIT WHEN CUR_EMP%NOTFOUND ;
DBMS_OUTPUT.put_line(T_EMP.EMPNO);
DBMS_OUTPUT.put_line(T_EMP.ENAME);
END LOOP;
CLOSE CUR_EMP;
END;
-----------------------------------------------------------------------------------------------------------------------
1.-- PL/SQL还提供了一种简单类型的循环,可以自动控制游标的打开、推进和关闭,叫做游标的FOR循环。
DECLARE
CURSOR CUR_EMP IS SELECT P.EMPNO,P.ENAME FROM SCOTT.EMP P;
BEGIN
----开始游标FOR循环,隐含地打开c_salary游标。
FOR T_EMPS IN CUR_EMP -- 自动定义变量T_EMPS ,自动选择使用合适的类型。来存储游标返回值
LOOP
----一个隐含的fetch语句在这里被执行
DBMS_OUTPUT.put_line(T_EMPS.EMPNO);
DBMS_OUTPUT.put_line(T_EMPS.ENAME);
--在循环继续前,一个隐含的c_auths%notfound被检测。
END LOOP;
--现在循环已经结束,c_auths游标的一个隐含的close操作被执行。
END;
2.--CURRENT OF C_EMP_CURSOR :如何通过游标来修改数据
DECLARE
--通过游标修改数据要上行级锁
CURSOR C_EMP_CURSOR IS
SELECT * FROM EMP2 WHERE DEPTNO = 30 FOR UPDATE;
BEGIN
FOR V_ROW IN C_EMP_CURSOR LOOP
-- DELETE FROM EMP2 WHERE CURRENT OF C_EMP_CURSOR;
-- WHERE CURRENT OF 游标,作为条件,用在删除、修改、查询(赋值)中;
END LOOP;
COMMIT;
END;
SELECT * FROM EMP;