zoukankan      html  css  js  c++  java
  • SQL Server自动生成存储过程(Insert,Update)

    /*===============插入源程序開始==================*/ 
    
    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
    
    /*===============修改源程序結束==================*/
    
    GO
    
    
    /*===============修改源程序開始==================*/ 
    
    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
    
    /*===============修改源程序結束==================*/
    
    GO
  • 相关阅读:
    简单的分页存储过程,Json格式日期转换为一般日期
    事件的那些事
    关于1Byte 1K 1M 1G(换算)
    VS自带WCF测试客户端简单介绍
    “System.Transactions.Diagnostics.DiagnosticTrace”的类型初始值设定项引发异常[WCF]
    周末大放送网站图片上传,水印,预览,截图
    FIREDAC驱动ORACLE的配置
    匿名方法实现多线程同步到主线程执行
    DELPHI跨平台的临界替代者
    三层数据库设计注意事项
  • 原文地址:https://www.cnblogs.com/sgxw/p/14971076.html
Copyright © 2011-2022 走看看