网站导航免费论文 原创论文 论文搜索 原创论文 网学软件 学术大家 资料中心 会员中心 问题解答 原创论文 大学论文导航 设计下载 最新论文 下载排行 原创论文 论文源代码
返回网学首页
网学联系
最新论文 推荐专题 热门论文 素材专题
当前位置: 网学 > 编程文档 > SQL SERVER > 正文

MSSQL Server编写存储过程小工具(二)

来源:http://myeducs.cn 联系QQ:点击这里给我发消息 作者: 用户投稿 来源: 网络 发布时间: 14/07/17

【编者按】:网学网SQL SERVER为您提供MSSQL Server编写存储过程小工具(二)参考,解决您在MSSQL Server编写存储过程小工具(二)学习中工作中的难题,参考学习。

  SQL Server编写存储过程小工具
  以下是两个存储过程的源程序
  /*===========================================================

  语法: sp_GenInsert <Table Name>,<Stored Procedure Name>
  以northwind 数据库为例
  sp_GenInsert ''Employees'', ''INS_Employees''

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

  =============================================================*/

  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

  drop table #tempproc

网学推荐

免费论文

原创论文

设为首页 | 加入收藏 | 论文首页 | 论文专题 | 设计下载 | 网学软件 | 论文模板 | 论文资源 | 程序设计 | 关于网学 | 站内搜索 | 网学留言 | 友情链接 | 资料中心
版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
Copyright 2008-2015 myeducs.Cn www.myeducs.Cn All Rights Reserved 湘ICP备09003080号