調整表的CHAR/VARCHAR2欄位的Byte為CHAR

調整表的CHAR/VARCHAR2欄位的Byte為CHAR

使用如下SQL指令碼即可：

1. set serveroutput on  
2. DECLARE  
3. sqlstr varchar2(4000);  
4. cursor sqlcurs is  
5. select owner,table_name,column_name,data_type,CHAR_LENGTH from dba_tab_columns   
6. where owner='ZFPT'  
7. and data_type in ('CHAR','VARCHAR2') order by table_name,column_id;  
8. begin  
9. for str in sqlcurs loop  
10.     sqlstr:='ALTER TABLE '||str.owner||'.'||str.table_name||' MODIFY('||str.column_name||' '||str.data_type||'('||str.CHAR_LENGTH||' CHAR'||'))';  
11.     dbms_output.put_line(sqlstr);  
12.     --execute immediate sqlstr;   
13. end loop;  
14. end;  
15. /  

註：對於那些作為分區列的欄位不能修改，會出現如下錯誤，並且會退出，所以最好是把命令輸出到一個sql指令碼裡面，然後在sqlplus命令列裡面去執行，也可以寫成預存程序然後捕獲異常並繼續。

ERROR at line 1:
ORA-14060: data type or length of a table partitioning column may not be changed
ORA-06512: at line 10