自动生成对表进行插入和更新的存储过程的存储过程

王朝other·作者佚名  2006-01-08
宽屏版  字体: |||超大  

我找到了两个存储过程,能自动生成对一个数据表的插入和更新的存储过程,现在奉献给大家!

插入:

Create procedure sp_GenInsert

@TableName varchar(130),

@ProcedureName varchar(130)

as

set nocount on

declare @maxcol int,

@TableID int

set @TableID = object_id(@TableName)

select @MaxCol = max(colorder)

from syscolumns

where id = @TableID

select 'Create Procedure ' + rtrim(@ProcedureName) as type,0 as colorder into #TempProc

union

select convert(char(35),'@' + syscolumns.name)

+ rtrim(systypes.name)

+ case when rtrim(systypes.name) in ('binary','char','nchar','nvarchar','varbinary','varchar') then '(' + rtrim(convert(char(4),syscolumns.length)) + ')'

when rtrim(systypes.name) not in ('binary','char','nchar','nvarchar','varbinary','varchar') then ' '

end

+ case when colorder < @maxcol then ','

when colorder = @maxcol then ' '

end

as type,

colorder

from syscolumns

join systypes on syscolumns.xtype = systypes.xtype

where id = @TableID and systypes.name <> 'sysname'

union

select 'AS',@maxcol + 1 as colorder

union

select 'INSERT INTO ' + @TableName,@maxcol + 2 as colorder

union

select '(',@maxcol + 3 as colorder

union

select syscolumns.name

+ case when colorder < @maxcol then ','

when colorder = @maxcol then ' '

end

as type,

colorder + @maxcol + 3 as colorder

from syscolumns

join systypes on syscolumns.xtype = systypes.xtype

where id = @TableID and systypes.name <> 'sysname'

union

select ')',(2 * @maxcol) + 4 as colorder

union

select 'VALUES',(2 * @maxcol) + 5 as colorder

union

select '(',(2 * @maxcol) + 6 as colorder

union

select '@' + syscolumns.name

+ case when colorder < @maxcol then ','

when colorder = @maxcol then ' '

end

as type,

colorder + (2 * @maxcol + 6) as colorder

from syscolumns

join systypes on syscolumns.xtype = systypes.xtype

where id = @TableID and systypes.name <> 'sysname'

union

select ')',(3 * @maxcol) + 7 as colorder

order by colorder

select type from #tempproc order by colorder

更新:

Create procedure sp_GenUpdate

@TableName varchar(130),

@PrimaryKey varchar(130),

@ProcedureName varchar(130)

as

set nocount on

declare @maxcol int,

@TableID int

set @TableID = object_id(@TableName)

select @MaxCol = max(colorder)

from syscolumns

where id = @TableID

select 'Create Procedure ' + rtrim(@ProcedureName) as type,0 as colorder into #TempProc

union

select convert(char(35),'@' + syscolumns.name)

+ rtrim(systypes.name)

+ case when rtrim(systypes.name) in ('binary','char','nchar','nvarchar','varbinary','varchar') then '(' + rtrim(convert(char(4),syscolumns.length)) + ')'

when rtrim(systypes.name) not in ('binary','char','nchar','nvarchar','varbinary','varchar') then ' '

end

+ case when colorder < @maxcol then ','

when colorder = @maxcol then ' '

end

as type,

colorder

from syscolumns

join systypes on syscolumns.xtype = systypes.xtype

where id = @TableID and systypes.name <> 'sysname'

union

select 'AS',@maxcol + 1 as colorder

union

select 'UPDATE ' + @TableName,@maxcol + 2 as colorder

union

select 'SET',@maxcol + 3 as colorder

union

select syscolumns.name + ' = @' + syscolumns.name

+ case when colorder < @maxcol then ','

when colorder = @maxcol then ' '

end

as type,

colorder + @maxcol + 3 as colorder

from syscolumns

join systypes on syscolumns.xtype = systypes.xtype

where id = @TableID and syscolumns.name <> @PrimaryKey and systypes.name <> 'sysname'

union

select 'WHERE ' + @PrimaryKey + ' = @' + @PrimaryKey,(2 * @maxcol) + 4 as colorder

order by colorder

select type from #tempproc order by colorder

drop table #tempproc

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
© 2005- 王朝网络 版权所有