oracle批量修改数据库的表结构

如果数据库有些表的表结构相同，想修改这些表的表结构的话，使用如下语句：

DECLARE 

    CURSOR TEMP IS SELECT TABLE_NAME  FROM USER_TABLES WHERE TABLE_NAME LIKE '  %TEST%' 

    STR  VARCHAR2(100) := ''; 

  BEGIN  

      FOR S IN TEMP LOOP 

       STR := 'ALTER TABLE '||S.TABLE_NAME||' MODIFY(ID NUMBER(20))';//修改ID字段的类型

        DBMS_OUTPUT.PUT_LINE(STR); 

      EXECUTE IMMEDIATE STR ; 

       

      END LOOP; 

  END;