Replace CHAR with VARCHAR2

问题

How can I replace CHAR with VARCHAR2 in all tables in a schema?

Note: I'm content with a query that returns the ALTER TABLE statements so I can save the script and run it again.

回答1:

select 'ALTER TABLE "' || owner || '"."' || table_name
|| '" MODIFY ("' || column_name
|| '" VARCHAR2(' || data_length || '));'
from all_tab_columns tc
where data_type = 'CHAR'
and owner = :schemaname
and exists (
    select 1
    from all_tables t
    where tc.owner = t.owner
    and tc.table_name = t.table_name
);

来源：https://stackoverflow.com/questions/2445982/replace-char-with-varchar2