DB2修改存储过程 (达到表结构的修改,和表的REORG)
狂奔小蜗牛 2012-12-06 01:01:45 需求就是在修改表结构之后
把REORG TABLE 加在存储过程里边 (达到表的解锁。) 一个存储过程完成
create or replace procedure ac(schema varchar(300),tabNM varchar(300),columnname varchar(200),type varchar(200),dataLength int,out err int)
language sql
begin atomic
declare v_sql varchar(200);
declare undo handler for sqlexception set err = 1;
if(dataLength=0) then
set v_sql = 'alter table '|| schema||'.'||tabNM||' alter column '||columnname||' set data type '||type;
else
set v_sql = 'alter table '|| schema||'.'||tabNM||' alter column '||columnname||' set data type '||type|| '('||dataLength||')';
end if;
prepare s1 from v_sql;
execute s1;
set err = 0;
end