Oracle數據庫中游標的游標的使用

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

案例1：

DECALRE
       --聲明游標
CURSOR C_USER(C_ID NUMBER) IS
       SELECT NAME FROM USER WHERE TYPEID = C_ID;
       V_NAME C_USER%rowtype; --定義游標變量
BEGIN
OPEN C_USER(變量值);    --打開游標
    LOOP
        FETCH C_USER INTO V_NAME;
        EXIT FETCH C_USER%NOT FOUND;
        do something
    END LOOP
CLOSE C_USER;     
END;  

是不是有點看不懂，沒關系，我也沒怎么看得懂

所以案例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：

問題：假如我查到多個表，而每個表都要加入同一個字段，這個怎么解決。

解決辦法如下：

--連接數據庫，是在命令窗口下執行的
登陸系統：
sqlplus /nolog
以管理員的身份運行：
SQL>conn / as sysdba

--以下是在SQL窗口下執行的
DECLARE
        ADD_SQL    VARCHAR2(1000);        --定義添加字段的語句
        ADD_TABLE_NAME  VARCHAR2(50);     --定義獲取的表名
        CURSOR ADD_TABLE_FIELD IS   --取名添加表字段
               SELECT TABLE_NAME FROM USER_TABLES where table_name like 'WRI%SYNOPSIS$' ; --查出指定的表出來
BEGIN
               OPEN ADD_TABLE_FIELD;
               LOOP
                    --提取一行數據到ADD_TABLE_FIELD
                    FETCH ADD_TABLE_FIELD  INTO ADD_TABLE_NAME;
                          --判斷是否讀取到，沒讀取到就退出
                          --%notfound是沒有取到的意思
                          EXIT WHEN ADD_TABLE_FIELD%NOTFOUND;
                          
                          --下面sql語句中，表名兩邊都要有空格，不然不會執行語句的，即:[table ']和[' add]不能寫成[table']和['add]
                          ADD_SQL  := 'alter table ' || ADD_TABLE_NAME || ' add 修改人 varchar2(20)';
                          EXECUTE IMMEDIATE ADD_SQL;--執行該語句
                          
                END LOOP;--關閉游標
                CLOSE ADD_TABLE_FIELD;
END;    

 

好了，差不多了，就這樣了。

 

等等，你們應該沒有照搬執行吧，不然的話， 怎么刪除我增加的列呢？