Oracle數據庫使用游標查詢結果集所有數據

--Oracle使用游標查詢結果集所有數據

DECLARE myTabelName NVARCHAR2(200):=''; --表名
      myTableRowComment NVARCHAR2(200):=''; --行內容
      result VARCHAR2(2000):=''; --結果
      CURSOR myCursor IS SELECT * FROM 結果集(表名/視圖名/查詢結果) ORDER BY (結果集中的列名);--定義游標 
      myRecord myCursor%ROWTYPE;  --定義游標記錄類型 
BEGIN   
    OPEN myCursor;  --打開游標 
    IF myCursor %ISOPEN  THEN  --判斷打開成功
       ---------------------游標打開成功 BEGIN 
       LOOP --循環獲取記錄集 BEGIN 
           
            FETCH myCursor into myRecord; IF myCursor%FOUND THEN  --游標的FOUND屬性判斷是否有記錄 
               BEGIN myTabelName:='TEC_PARTTEC'; myTableRowComment:=myRecord.ID||'    '||myRecord.CREATEDATE||'    '
　　　　　　　　　　　　　　　　　　　　　　　||myRecord.CREATEUSER||'    '||myRecord.ORGANIZATIONID||'    '
　　　　　　　　　　　　　　　　　　　　　　 ||myRecord.PARTID||'    '||myRecord.PROCESSTYPE||'    '
　　　　　　　　　　　　　　　　　　　　　 ||myRecord.VERSION||'    '||myRecord.REMARK||'    '
　　　　　　　　　　　　　　　　　　　　　　　||myRecord.STATE; result:='表名 '||myTabelName||' 列值 '||myTableRowComment; result:=myTabelName||'    '||myTableRowComment; DBMS_OUTPUT.PUT_LINE(result); END; ELSE
               EXIT; --游標中的記錄為空 退出
            END IF; --結束IF語句
               
       END LOOP; --循環獲取記錄集 END 
    ELSE DBMS_OUTPUT.PUT_LINE('游標沒有打開'); END IF; CLOSE myCursor; END;

 

 

 

參考原文