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

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

案例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; --定义游标变量
 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;    

 

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

 

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