Oracle plsql 记录和游标的用法

DECLARE

  TYPE STU_REC IS RECORD(

    stu_id   VARCHAR2(20) not null := '去死吧' --id, 

    ,

    stu_name VARCHAR(30) not null := '死吧' --姓名

    ,

    age       NUMBER(4) --年龄

    ); --定义一个学生记录类型,包含学生id,name,age等属性

  liming_stu STU_REC; --声明一个学生记录类型的变量 liming_stu;

  cursor info is

    select pk_corp, unitname from tmp_corp; --定义一个游标

BEGIN

  open info; --打开游标

  loop

    --开始循环

    fetch info

      into liming_stu.stu_id, liming_stu.stu_name; --从游标中取出数据并负责给 liming_stu记录的字段中

    dbms_output.put_line('id:' || liming_stu.stu_id || '   姓名:' ||

                          liming_stu.stu_name); --对liming_stu 记录的字段进行输出

    exit when info%notfound; --当游标中的数据到达底部时,退出

  end loop; --结束循环

  close info; --关闭游标

exception

  when others then

    rollback; --异常处理

END;

改进后的版本为

DECLARE

  TYPE STU_REC IS RECORD(

    STU_ID   TMP_CORP.PK_CORP%TYPE,

    STU_NAME TMP_CORP.UNITNAME%TYPE,

    STU_CODE TMP_CORP.INNERCODE%TYPE);

  hua_rec STU_REC;

  CURSOR Cursor_info IS

    SELECT PK_CORP, UNITNAME, INNERCODE FROM TMP_CORP;

BEGIN

  OPEN Cursor_info;

  loop

    fetch Cursor_info

      into hua_rec;

    exit when Cursor_info%notfound;

    dbms_output.put_line('id' || hua_rec.stu_id || ' name' ||

                          hua_rec.stu_name);

  end loop;

  CLOSE Cursor_info;

exception

  when others then

    rollback;

END;

<script type="text/javascript" id="wumiiRelatedItems"> </script>

转发至微博

 

转发至微博