当前位置: 首页 > 图文教程 > 数据库 > MSSQL > SQLServer编写存储过程小工具(三)

MSSQL
MS SQL数据库备份和恢复存储过程
深入SQL SERVER 2000的内存管理机制(三)
深入SQL SERVER 2000的内存管理机制(二)
全接触sqlserver异常与孤立事务
理解odbc和ole
sql优化器探讨
SQL备份并压缩备份文件
SQL SERVER 2000 SP4新特性概述
SQL服务器外网IP测试故障解决
保卫你的SQL Server数据库
SQL Server密码安全追踪和存储
SQL Server的链接服务器技术小结
一些Select检索高级用法
SQL Server中发送邮件的新方式
深入探讨SQL Server 2000对XML的支持
SQLServer和Oracle的常用函数对比
SQL Server的用户及权限
SQL注入攻击通杀
SQL Server 安全检查列表
SQL Server中处理死锁

MSSQL 中的 SQLServer编写存储过程小工具(三)


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-10-17   浏览: 104 ::
收藏到网摘: n/a

SQLServer编写存储过程小工具
功能:为给定表创建Update存储过程
语法:sp_GenUpdate<TableName>,<PrimaryKey>,<StoredProcedureName>
以northwind数据库为例
sp_GenUpdate'Employees','EmployeeID','UPD_Employees'

注释:如果您在Master系统数据库中创建该过程,那您就可以在您服务器上所有的数据库中使用该过程。


/*===========================================================*/
CREATEproceduresp_GenUpdate
@TableNamevarchar(130),
@PrimaryKeyvarchar(130),
@ProcedureNamevarchar(130)
as
setnocounton


declare@maxcolint,
@TableIDint
'knowsky.com
set@TableID=object_id(@TableName)


select@MaxCol=max(colorder)
fromsyscolumns
whereid=@TableID


select'CreateProcedure'+rtrim(@ProcedureName)astype,0ascolorderinto#TempProc
union
selectconvert(char(35),'@'+syscolumns.name)
+rtrim(systypes.name)
+casewhenrtrim(systypes.name)in('binary','char','nchar','nvarchar','varbinary','varchar')then'('+rtrim(convert(char(4),syscolumns.length))+')'
whenrtrim(systypes.name)notin('binary','char','nchar','nvarchar','varbinary','varchar')then''
end
+casewhencolorder<@maxcolthen','
whencolorder=@maxcolthen''
end
astype,
colorder
fromsyscolumns
joinsystypesonsyscolumns.xtype=systypes.xtype
[email protected]<>'sysname'
union
select'AS',@maxcol+1ascolorder
union
select'UPDATE'+@TableName,@maxcol+2ascolorder
union
select'SET',@maxcol+3ascolorder
union
selectsyscolumns.name+'=@'+syscolumns.name
+casewhencolorder<@maxcolthen','
whencolorder=@maxcolthen''
end
astype,
colorder+@maxcol+3ascolorder
fromsyscolumns
joinsystypesonsyscolumns.xtype=systypes.xtype
[email protected]<>@PrimaryKeyandsystypes.name<>'sysname'
union
select'WHERE'+@PrimaryKey+'=@'+@PrimaryKey,(2*@maxcol)+4ascolorder
orderbycolorder


selecttypefrom#tempprocorderbycolorder


droptable#tempproc
/*=======源程序结束=========*/