END LOOP; 

        CLOSE c_emp; 

        DBMS_OUTPUT.PUT_LINE(''''Toltal Salary for dept:''''|| v_tot_salary); 

     END LOOP; 

  CLOSE c_dept; 

END; 

游标FOR循环 

在大多数时候我们在设计程序的时候都遵循下面的步骤： 

1、打开游标 

2、开始循环 

3、从游标中取值 

4、检查那一行被返回 

5、处理 

6、关闭循环 

7、关闭游标 

    可以简单的把这一类代码称为游标用于循环。但还有一种循环与这种类型不相同，这就是FOR循环，用于FOR循环的游标按照正常的声明方式声明，它的优点在于不需要显式的打开、关闭、取数据，测试数据的存在、定义存放数据的变量等等。游标FOR循环的语法如下： 

FOR record_name IN 

 (corsor_name[(parameter[,parameter]...)] 

 | (query_difinition) 

LOOP 

  statements 

END LOOP; 

下面我们用for循环重写上面的例子： 

DECALRE 

CURSOR c_dept IS SELECT deptno,dname FROM dept ORDER BY deptno; 

CURSOR c_emp (p_dept VARACHAR2) IS 

 SELECT ename,salary 

 FROM emp 

 WHERE deptno=p_dept 

 ORDER BY ename 

v_tot_salary EMP.SALARY%TYPE; 

BEGIN 

   FOR r_dept IN c_dept LOOP 

     DBMS_OUTPUT.PUT_LINE(''''Department:''''|| r_dept.deptno||''''-''''||r_dept.dname); 

     v_tot_salary:=0; 

     FOR r_emp IN c_emp(r_dept.deptno) LOOP 

    DBMS_OUTPUT.PUT_LINE(''''Name:'''' || v_ename || ''''salary:'''' || v_salary);  

    v_tot_salary:=v_tot_salary+v_salary; 

     END LOOP; 

     DBMS_OUTPUT.PUT_LINE(''''Toltal Salary for dept:''''|| v_tot_salary); 

  END LOOP; 

END; 

在游标FOR循环中使用查询 

    在游标FOR循环中可以定义查询，由于没有显式声明所以游标没有名字，记录名通过游标查询来定义。 

DECALRE 

 v_tot_salary EMP.SALARY%TYPE; 

BEGIN 

  FOR r_dept IN (SELECT deptno,dname FROM dept ORDER BY deptno) LOOP 

     DBMS_OUTPUT.PUT_LINE(''''Department:''''|| r_dept.deptno||''''-''''||r_dept.dname); 

     v_tot_salary:=0; 

     FOR r_emp IN (SELECT ename,salary 

            　　　FROM emp 

            　　　WHERE deptno=p_dept 

            　　　ORDER BY ename) LOOP 

       DBMS_OUTPUT.PU

上一页  [1] [2] [3] [4] [5] [6]  下一页