ORACEL游标的使用实例

显式游标 
游标的定义和操作 

--游标的使用实例
DECLARE
    V_NAME   VARCHAR(10);
    V_SCHOOL VARCHAR(10); --声明变量
    CURSOR M_CORSOR IS
        SELECT A.USER_NAME, A.SCHOOL FROM USER_M A WHERE A.USER_ID = '11'; --定义游标
BEGIN
    OPEN M_CORSOR; --打开游标
    FETCH M_CORSOR
        INTO V_NAME, V_SCHOOL; --提取数据
    DBMS_OUTPUT.PUT_LINE(V_NAME || ',' || V_SCHOOL);
    CLOSE M_CORSOR; --关闭游标
END;

--游标的使用实例2
DECLARE
  P_NAME VARCHAR2(20);
  P_NUM NUMBER;
  P_PRICE NUMBER;
 CURSOR P_CURSOR IS 
 SELECT PRODUCT_NAME,PRODUCT_NUM,PRICE FROM  PRODUCT_RELEASE  ORDER BY PRODUCT_ID;--排序
 BEGIN
   OPEN P_CURSOR;
   FOR I IN 1..5 LOOP  --循环
     FETCH P_CURSOR INTO P_NAME,P_NUM,P_PRICE;
     DBMS_OUTPUT.PUT_LINE(P_NAME||','||P_NUM||','||P_PRICE);
     END LOOP;
     CLOSE P_CURSOR;
     END;