sp_adddconstraintudt(增加原有默认值约束).sql

SQL2005 不支持原有的SQL2000修改数据类型方式

if exists (select 1
          from sysobjects
          where name = 'sp_addDconstraintUDT'
          and type = 'P')
   drop procedure sp_addDconstraintUDT
go
/*******************************************************************************************
*	system:  管理系统
*	subsys:  数据中心
*	proc:    sp_addDconstraintUDT(增加原有默认值约束).sql
*	comm:	 增加默认值约束的时候还原有的约束
*	created by yangsh in 2008-10-14
*	edit: 
*	edit remark: 
* debug:	 exec sp_addDconstraintUDT
*********************************************************************************************/
create procedure sp_addDconstraintUDT 
--(
--	@usdftp varchar(20)		--自定义数据类型
--)
as
begin
    print '开始增加原来删除的默认值约束'
    declare @exsql varchar(2000)
        set @exsql=''
    declare @tablna varchar(30)
    declare @pkname varchar(100)
    declare @coluna varchar(20)
    declare @text  varchar(1000)

    declare pknu cursor local for
    select tablna,pkname,coluna,indest
    from df_name
    open pknu
    fetch next from pknu into @tablna,@pkname,@coluna,@text
    while @@fetch_status=0
        begin
--alter table spt_values add constraint DF__spt_value__statu__436BFEE3  default 0 for status with values
--alter table [spt_values] drop constraint [DF__spt_value__statu__436BFEE3]

     select @exsql='alter table ['+@tablna+'] add constraint ['+@pkname+'] default ''' + @text +''' for ['
     +@coluna+'] with values ;'

     print @exsql
     exec (@exsql)
     fetch next from pknu into @tablna,@pkname,@coluna,@text
    end
  close pknu
  deallocate pknu


  print '成功增加自定义类型做默认值的表的字段！'

end