DM8,DATE转TIMESTAMP

declare
   tableName varchar(100);
   columnName varchar(100);
   updateSql varchar(100);
begin
  for c in (select * from dba_tab_columns where DATA_TYPE = 'DATE' and TABLE_NAME LIKE 'ACT%' 
  AND (COLUMN_NAME LIKE '%TIME' OR COLUMN_NAME LIKE '%time')) loop
     dbms_output.put_line('--------->'||c.table_name||'__'||c.COLUMN_NAME||'<---------');
     --赋值
     tableName := c.table_name;
     columnName:= c.COLUMN_NAME;
     --创建修改语句
     updateSql := 'alter table '||tableName||' modify('||columnName||' TIMESTAMP)';
     dbms_output.put_line('--------->'||updateSql||'<---------');
     --执行
     execute immediate updateSql;
     tableName := '';
     columnName := '';
     updateSql := '';
  end loop;
end;