sql server生成表数据(insert脚本)的存储教程

CREATE PROCEDURE   dbo.OutputData    
 @tablename   sysname
 AS
 declare   @column   varchar(1000)    
 declare   @columndata   varchar(1000)    
 declare   @sql   varchar(4000)    
 declare   @xtype   tinyint
 declare   @name   sysname
 declare   @objectId   int
 declare   @objectname   sysname
 declare   @ident   int

 set   nocount   on
 set   @objectId=object_id(@tablename)    
 if  @objectId   is   null   --   判断对象是否存在    
     begin
print  @tablename + '对象不存在'    
return
    end    

 set @objectname=rtrim(object_name(@objectId))    
 if @objectname is null or charindex(@objectname,@tablename)=0
    begin
print  @tablename + '对象不在当前数据库中'
return
    end 

 if  OBJECTPROPERTY(@objectId,'IsTable')   <   >   1   --   判断对象是否是表    
    begin
print  @tablename + '对象不是表'    
return
    end 

 select   @ident=status&0x80   from   syscolumns   where   id=@objectid   and   status&0x80=0x80  

 if @ident is   not   null
    print   'SET   IDENTITY_INSERT   '+ @TableName + '   ON'   

 --定义游标，循环取数据并生成Insert语句
 declare  syscolumns_cursor cursor for  
    select   c.name,c.xtype   from   syscolumns   c    
where   c.id=@objectid    
order   by   c.colid   

 --打开游标
 open   syscolumns_cursor    
 set  @column=''    
 set  @columndata=''    
 fetch   next   from   syscolumns_cursor   into   @name,@xtype    
 while   @@fetch_status   <> -1    
    begin
    if   @@fetch_status   <> -2    
begin
if   @xtype   not   in(189,34,35,99,98)   --timestamp不需处理，image,text,ntext,sql_variant 暂时不处理    
  begin
  set   @column=@column +
    case   when   len(@column)=0   then '' 
     else   ','
     end + @name    
  set   @columndata = @columndata +
    case   when   len(@columndata)=0   then   ''  
     else   ','','','
     end  +
    case   when  @xtype   in(167,175) then   '''''''''+'+@name+'+'''''''''    --varchar,char    
     when   @xtype   in(231,239)   then   '''N''''''+'+@name+'+''''''''' --nvarchar,nchar    
     when   @xtype=61   then   '''''''''+convert(char(23),'+@name+',121)+'''''''''   --datetime    
     when   @xtype=58   then   '''''''''+convert(char(16),'+@name+',120)+'''''''''   --smalldatetime    
when   @xtype=36   then   '''''''''+convert(char(36),'+@name+')+''''''''' --uniqueidentifier    
     else   @name  
     end
  end
end
  fetch   next   from   syscolumns_cursor   into   @name,@xtype    
end
 close   syscolumns_cursor
 deallocate   syscolumns_cursor

 set  @sql='set   nocount   on   select   ''insert   '+@tablename+'('+@column+')   values(''as   ''--'','+@columndata+','')''   from   '+@tablename

 print   '--'+@sql    
 exec(@sql)  

 if   @ident   is   not   null
 print  'SET   IDENTITY_INSERT   '+@TableName+'   OFF'