欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  IT编程

Oracle数据库中游标的游标的使用

程序员文章站 2023-11-14 11:27:46
本人不喜欢说概念啥的,就直接说明使用方法吧 案例1: 1 DECALRE 2 --声明游标 3 CURSOR C_USER(C_ID NUMBER) IS 4 SELECT NAME FROM USER WHERE TYPEID = C_ID; 5 V_NAME C_USER%rowtype; -- ......

本人不喜欢说概念啥的,就直接说明使用方法吧

案例1:

Oracle数据库中游标的游标的使用
 1 decalre
 2        --声明游标
 3 cursor c_user(c_id number) is
 4        select name from user where typeid = c_id;
 5        v_name c_user%rowtype; --定义游标变量
 6 begin
 7 open c_user(变量值);    --打开游标
 8     loop
 9         fetch c_user into v_name;
10         exit fetch c_user%not found;
11         do something
12     end loop
13 close c_user;     
14 end;  
view code
是不是有点看不懂,没关系,我也没怎么看得懂

所以案例2:

说明:

  1、file$是表名,file#, status$,blocks 是字段名

  2、将表file$中的file#, status$,blocks 数据列出来,相当于select file#, status$,blocks from file$;

--连接系统数据库
sql>conn / as sysdba

--以下是在sql窗口下执行的
declare
       --声明游标
       cursor cur_file is
              select file#, status$,blocks from file$;
       curfileinfo cur_file%rowtype;  --定义游标变量(所有的变量都在里面)
begin
       open  cur_file; --打开游标
       loop
             fetch cur_file into curfileinfo ; 
             exit when cur_file%notfound;--查不到数据则退出;
             dbms_output.put_line(curfileinfo.file#);
        end loop;
        exception--出现异常,则关闭游标,并打印出问题来
            when others then
                 close cur_file;
                 dbms_output.put_line(sqlerrm);
                 
         if cur_file%isopen then
                  --关闭游标
                  close cur_file;
         end if;
end;

 然后稍微进阶一下:

案例3:

问题:假如我查到多个表,而每个表都要加入同一个字段,这个怎么解决。

解决办法如下:

 1 --连接数据库,是在命令窗口下执行的
 2 登陆系统:
 3 sqlplus /nolog
 4 以管理员的身份运行:
 5 sql>conn / as sysdba
 6 
 7 --以下是在sql窗口下执行的
 8 declare
 9         add_sql    varchar2(1000);        --定义添加字段的语句
10         add_table_name  varchar2(50);     --定义获取的表名
11         cursor add_table_field is   --取名添加表字段
12                select table_name from user_tables where table_name like 'wri%synopsis$' ; --查出指定的表出来
13 begin
14                open add_table_field;
15                loop
16                     --提取一行数据到add_table_field
17                     fetch add_table_field  into add_table_name;
18                           --判断是否读取到,没读取到就退出
19                           --%notfound是没有取到的意思
20                           exit when add_table_field%notfound;
21                           
22                           --下面sql语句中,表名两边都要有空格,不然不会执行语句的,即:[table ']和[' add]不能写成[table']和['add]
23                           add_sql  := 'alter table ' || add_table_name || ' add 修改人 varchar2(20)';
24                           execute immediate add_sql;--执行该语句
25                           
26                 end loop;--关闭游标
27                 close add_table_field;
28 end;    

 

好了,差不多了,就这样了。

 

等等,你们应该没有照搬执行吧,不然的话, 怎么删除我增加的列呢?