Sql Server 给表添加合计并统计金额的存储过程!(源代码分享)
来源:互联网 发布:python re findall 编辑:程序博客网 时间:2024/05/19 18:41
USE [life]GO/****** 对象: StoredProcedure [dbo].[类_表添加合计] 脚本日期: 06/09/2012 09:33:16 ******/SET ANSI_NULLS ONGOSET QUOTED_IDENTIFIER ONGO-- <><><><><><><><><><><><><>-- <> <>-- <> 类_表添加合计 <>-- <> <>-- <><><><><><><><><><><><><>ALTER PROCEDURE [dbo].[类_表添加合计]@Sql_Table varchar(30) = 'Temp_Print3', -- 表名称 @Sql_Field varchar(500) = 'Money,Number', -- 合计字段名 @Sql_TotalField varchar(500) = 'Materials_Name', -- '合计'填入字段名@Sql_Where varchar(500) = '(Deleted=0 or deleted is null)' -- 表条件AsBEGINSET NOCOUNT ON;-- ╔════════╗-- ======================================== ║ 定义默认变量 ║-- ╚════════╝ declare @Sql_Sql nvarchar(2000) -- Sql执行语句set @Sql_Sql = '' -- Sql执行语句declare @Sql_Temp nvarchar(1000) -- Sql执行语句set @Sql_Temp = '' -- Sql执行语句declare @temp_1 varchar(1000) -- 空字段变量 set @temp_1=''declare @sql_Ifield varchar(500) -- 出现次数set @sql_Ifield=@Sql_Fielddeclare @sql_count int -- 出现次数set @sql_count=0-- -- ╔════════╗-- ========================================== ║ 执 行 程 序 ║-- ╚════════╝ -- ★★★ 开始循环取出字段 set @Sql_Field =@Sql_Field+',' set @temp_1=SUBSTRING(@Sql_Field,1,CHARINDEX(',',@Sql_Field)-1) -- 第一个值 while @sql_count<200begin -- ======================================== // 【循环内代码】赋值关联表 @sql_TempField set @Sql_Temp=@Sql_Temp+' Sum('+@temp_1+') as '+ @temp_1+',' -- ======================================== // 【循环结束取值】 set @Sql_Field=RTRIM(LTRIM((SUBSTRING(@Sql_Field,CHARINDEX(',',@Sql_Field)+1,1000)))) -- 截去已用过 -- 如果取完了,退出 if CHARINDEX(',',@Sql_Field)=0 begin break end -- 一个一个的取值 set @temp_1=RTRIM(LTRIM((SUBSTRING(@Sql_Field,1,CHARINDEX(',',@Sql_Field)-1)))) End set @Sql_Temp=SUBSTRING(@Sql_Temp,1,len(@Sql_Temp)-1) --print @Sql_Temp -- 显示字符串结果 -- ★★★ 判断是否有生成表名 -- 删除生成的临时表 -- exec 类_删除表 @Sql_TempTable -- ★★★ 组合sql语句-- insert into temp_print3 (number,money,Materials_Name) select sum(number),sum(money),'合 计' from temp_print3 set @Sql_Sql='insert into '+@Sql_Table+' ('+@sql_Ifield+','+@Sql_TotalField+') select '+@Sql_Temp+','+''''+'合 计'+''''+' from '+@Sql_Table print @Sql_Sql EXEC (@Sql_Sql)END