Oracle使用游標為所有用戶表添加主鍵語句

Oracle使用游標為所有用戶表添加主鍵語句

應用場合：數據表新增自增一主鍵能加快數據表的訪問速度，而且是整形的索引速度最快。本程序適合在導入Oracle數據庫時刪除不存在主鍵的情況下運行。

代碼說明：所有的表主鍵字段名都設置為ID,如果已存在ID字段，則判斷是否是整形，如果不是就重命名字段為[表名ID]，然後新增ID，如果不存在則直接添加自增一ID的主鍵

操作說明：打開PQSQL連接數據庫後直接執行下面的詳細腳本代碼運行即可，腳本有風險(會刪除原來的索引跟主鍵約束)，請不要輕易在正式運行的數據庫上直接執行

--Oracle使用游標為所有用戶表添加主鍵語句

declare

addstring NVARCHAR2(2000):=' '; --定義添加字段變量

constring NVARCHAR2(2000):=' '; --定義索引變量

cursor mycursor is select * from user_tables where TABLESPACE_NAME='SZGABL' ORDER BY TABLE_NAME; --定義游標獲取所所有用戶數據表名稱

begin

dbms_output.put_line('declare counter int :=0;begin ');

open mycursor; --打開游標

if mycursor%found then --游標的found屬性判斷是否有記錄

--創建一個序列

--execute immediate addstring;

else

close mycursor;

dbms_output.put_line('end;');