ORACLE 游标的基本使用

/**//*******************游标使用的基本格式1***********************/
DECLARE 
  CURSOR mycur IS
    SELECT * FROM emp;
    myrecord emp%ROWTYPE;
BEGIN
  IF mycur%ISOPEN THEN 
    OPEN mycur;
  END IF;
  FETCH mycur INTO myrecord;
  WHILE mycur%FOUND LOOP
    DBMS_OUTPUT.PUT_LINE(mycur%ROWCOUNT|||','||myrecord.empno||','||myrecord.ename);
    FETCH mycur INTO myrecord;
  END LOOP;
  CLOSE mycur;
END;
/

/**//*******************游标使用的基本格式2***********************/
DECLARE 
  CURSOR mycur IS
    SELECT * FROM emp;
    myrecord emp%ROWTYPE;
BEGIN
  IF NOT mycur%ISOPEN THEN 
    OPEN mycur;
  END IF;
  LOOP
    FETCH mycur INTO myrecord;
    EXIT WHEN mycur%NOTFOUND;
    DBMS_OUTPUT.PUT_LINE(mycur%ROWCOUNT|||','||myrecord.empno||','||myrecord.ename);
  END LOOP;
  CLOSE mycur;
END;
/

/**//*******************游标 For Loop ***********************/
DECLARE 
  CURSOR mycur IS
    SELECT * FROM emp;
BEGIN
  FOR cur IN mycur LOOP
    DBMS_OUTPUT.PUT_LINE(mycur%ROWCOUNT||','||cur.empno||','||cur.ename);
  END LOOP;
END;
/

/**//*******************参数化游标***********************/
DECLARE 
  CURSOR mycur(dept_no varchar2) IS --参数不定义长度和精度
    SELECT empno,ename,dname FROM emp  a  INNER JOIN dept b ON a.deptno = b.deptno WHERE a.deptno= dept_no;
BEGIN
  FOR cur IN mycur('20') LOOP
    DBMS_OUTPUT.PUT_LINE(mycur%ROWCOUNT||','||cur.empno||','||cur.ename||','||cur.dname);
  END LOOP;
END;
/