oracle 游标遍历表记录,Oracle 10g使用游标遍历表数据

Oracle 10g使用游标遍历表数据，代码如下：

CREATE OR REPLACE PROCEDURE PRO_SENDMSG

IS

--创建游标，用于遍历单位表数据

CURSOR MYCUS IS

SELECT U.UNITINFO_ID,U.UNITINFO_NAME FROM T_ER_UNITINFO U WHERE U.UNITINFO_TYPE=13;

TYPE rowType IS RECORD(

id NUMBER,

name NVARCHAR2(100)

);

currRowType rowType;

UnitID NUMBER;  --单位ID

UnitName NVARCHAR2(100);  --单位名称

BEGIN

--1、遍历单位ID，单位名称

OPEN MYCUS; --开启游标

LOOP

FETCH MYCUS INTO currRowType;

EXIT WHEN  MYCUS%NOTFOUND;

UnitID:=currRowType.id; --为要的值：单位ID

UnitName:=currRowType.name; --为要的值：单位名称

Dbms_Output.put_line(UnitID); --输出值

END LOOP;      CLOSE MYCUS; --关闭游标 END PRO_SENDMSG;