declare @tname nvarchar(255)=N'要修改的表名';

--修改所有以sl结尾的列名的小数位数为4位

select syscolumns.name into #t1

from syscolumns,systypes

where syscolumns.xusertype = systypes.xusertype

and syscolumns.id = object_id(@tname)

and syscolumns.name like '%sl' and systypes.name='numeric';

while exists(select top 1 name from #t1)

begin

declare @cname varchar(255);

select top 1 @cname=name from #t1

delete #t1 where name=@cname;

declare @sql nvarchar(1000);

set @sql=N'alter table '+@tname+' alter column '+@cname+' numeric(19,4)';

exec sp_executesql @sql;

end

drop table #t1;