SQLSERVER2000下按任意的字段旋转的存储过程

最新推荐文章于 2024-10-31 11:36:34 发布
最新推荐文章于 2024-10-31 11:36:34 发布
阅读量914 收藏
点赞数
分类专栏： SQLSERVER 文章标签： sqlserver 存储 sql null cmd function
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/MSTOP/article/details/3054069
版权

 ----------------------------------------------------------------------------
-- 分段截取函数
----------------------------------------------------------------------------
CREATE    FUNCTION DBO.FUN_SplitStr(
@S VARCHAR(8000),      -- 包含多个数据项的字符串
@POS INT,              -- 要获取的数据项的位置
@SPLIT VARCHAR(10)    -- 数据分隔符
) RETURNS VARCHAR(128)
AS
BEGIN
IF @S IS NULL RETURN(NULL)
DECLARE @SPLITLEN INT
SELECT @SPLITLEN=LEN(@SPLIT+'A')-2
WHILE @POS>1 AND CHARINDEX(@SPLIT,@S+@SPLIT)>0 BEGIN
SELECT @POS=@POS-1,
@S=STUFF(@S,1,CHARINDEX(@SPLIT,@S+@SPLIT)+@SPLITLEN,'')
END
RETURN  LEFT(@S,CHARINDEX(@SPLIT,@S+@SPLIT)-1)
END

-------------------------------------------
--行列转换
-------------------------------------------
CREATE  PROC PRC_CORSSQUERY
@NVR_TABNAME AS NVARCHAR(1024) = '', -- 此处放表名
@NVR_XCOL AS NVARCHAR(1024) = '', -- 表头分组依据字段 (横向字段,以系统编号作为依据,内部转化,此字段只能有一个)
@NVR_YCOL AS NVARCHAR(1024) = '', -- 分组字段        (纵向字段,直接取名称列,可以有多个,多个用逗号分隔)
@NVR_STATCOL AS NVARCHAR(1024) = '', -- 被统计的字段    (值)
@NVR_WHERE AS NVARCHAR(4000)='', -- WHERE条件  (一定要带 WHERE 语句,如:WHERE 地区=''广州'' )  * 注意字符一定要用两个分号.
@NVR_TOTAL AS NVARCHAR(1024)='', -- 合计的公式( SUM,AVG ,将其放在第一列.如果多项,请用逗号分隔)
@NVR_ORDERBY AS NVARCHAR(1024)=''          -- 排序字段,如: [海关编码],[地区]
AS BEGIN

    --SET NOCOUNT ON

DECLARE @NVR_CMD AS NVARCHAR(4000)
DECLARE @NVR_XCOLNAME AS NVARCHAR(256)

DECLARE @NVR_SQL0 AS NVARCHAR(4000)
DECLARE @NVR_SQL1 AS NVARCHAR(4000)
DECLARE @NVR_SQL2 AS NVARCHAR(4000)
DECLARE @NVR_SQL3 AS NVARCHAR(4000)
DECLARE @NVR_SQL4 AS NVARCHAR(4000)
DECLARE @NVR_SQL5 AS NVARCHAR(4000)
DECLARE @NVR_SQL6 AS NVARCHAR(4000)
DECLARE @NVR_SQL7 AS NVARCHAR(4000)
DECLARE @NVR_SQL8 AS NVARCHAR(4000)
DECLARE @NVR_SQL9 AS NVARCHAR(4000)
DECLARE @NVR_SQL10 AS NVARCHAR(4000)
DECLARE @NVR_SQL11 AS NVARCHAR(4000)
DECLARE @NVR_SQL12 AS NVARCHAR(4000)
DECLARE @NVR_SQL13 AS NVARCHAR(4000)
DECLARE @NVR_SQL14 AS NVARCHAR(4000)
DECLARE @NVR_SQL15 AS NVARCHAR(4000)
DECLARE @NVR_SQL16 AS NVARCHAR(4000)
DECLARE @NVR_SQL17 AS NVARCHAR(4000)
DECLARE @NVR_SQL18 AS NVARCHAR(4000)
DECLARE @NVR_SQL19 AS NVARCHAR(4000)
DECLARE @NVR_SQL20 AS NVARCHAR(4000)

DECLARE @NVR_DATETYPE AS NVARCHAR(1)
DECLARE @INT_ID AS INT
DECLARE @NVR_GOODSUNIT AS NVARCHAR(32)
DECLARE @INT_UNIT INT

SELECT @NVR_SQL0='',@INT_ID=0,@NVR_SQL0='',@NVR_SQL1='',@NVR_SQL2='',@NVR_SQL3='',@NVR_SQL4='',@NVR_SQL5='',@NVR_SQL6='',@NVR_SQL7='',@NVR_SQL8='',@NVR_SQL9='',
@NVR_SQL10='',@NVR_SQL11='',@NVR_SQL12='',@NVR_SQL13='',@NVR_SQL14='',@NVR_SQL15='',@NVR_SQL16='',@NVR_SQL17='',@NVR_SQL18='',@NVR_SQL19='',@NVR_SQL20=''
 
DECLARE @INT_I INT
DECLARE @NVR_FLDNAME NVARCHAR(128)

SET @NVR_SQL0 = ' SELECT ' +  @NVR_YCOL
-- 横向合计
DECLARE @NVR_SPTOTAL NVARCHAR(512)
DECLARE @INT_N AS INT
DECLARE @NVR_TOTALSQL  NVARCHAR(512)

SELECT  @INT_N=0,@NVR_TOTALSQL='',@NVR_TOTAL=RTRIM(LTRIM(ISNULL(@NVR_TOTAL,'')))
IF @NVR_TOTAL <>'' BEGIN
WHILE (1=1) BEGIN
    SET @INT_N=@INT_N+1
    SELECT @NVR_SPTOTAL= DBO.FUN_SplitStr(@NVR_TOTAL,@INT_N,',')  -- 以逗号为分隔
    SET @NVR_SPTOTAL=LTRIM(RTRIM(ISNULL(@NVR_SPTOTAL,'')))
    IF  @NVR_SPTOTAL <>'' BEGIN
        IF @NVR_SPTOTAL='SUM' BEGIN
            SET @NVR_TOTALSQL=@NVR_TOTALSQL + ',' + @NVR_SPTOTAL + '(' + @NVR_STATCOL + ') AS [SUM]'
        END ELSE IF @NVR_SPTOTAL='AVG' BEGIN
            SET @NVR_TOTALSQL=@NVR_TOTALSQL + ',' + @NVR_SPTOTAL + '(' + @NVR_STATCOL + ') AS [AVG]'
END ELSE IF @NVR_SPTOTAL='MAX' BEGIN
            SET @NVR_TOTALSQL=@NVR_TOTALSQL + ',' + @NVR_SPTOTAL + '(' + @NVR_STATCOL + ') AS [MAX]'
END ELSE IF @NVR_SPTOTAL='MIN' BEGIN
            SET @NVR_TOTALSQL=@NVR_TOTALSQL + ',' + @NVR_SPTOTAL + '(' + @NVR_STATCOL + ') AS [MIN]'
        END
    END ELSE BEGIN
        BREAK
    END
END
SET @NVR_SQL0=@NVR_SQL0 + @NVR_TOTALSQL
END

SET @NVR_CMD='DECLARE CORSS_CURSOR CURSOR FOR SELECT DISTINCT ' + @NVR_XCOL + '  FROM ' + @NVR_TABNAME + ' ' + @NVR_WHERE + ' ORDER BY ' + @NVR_XCOL + ' FOR READ ONLY ' --生成游标


EXECUTE (@NVR_CMD)
OPEN CORSS_CURSOR

WHILE (1=1)  BEGIN
FETCH NEXT FROM CORSS_CURSOR INTO @NVR_XCOLNAME  --遍历游标，将列头信息放入变量@NVR_XCOLNAME
IF (@@FETCH_STATUS <>0) BREAK

SET @INT_ID=@INT_ID+1
SET @NVR_XCOLNAME=REPLACE(@NVR_XCOLNAME ,CHAR(39),CHAR(39)+CHAR(39))

------------------------------------------------------------------------------
-- 可添加 数量,单价,金额 同时显示.单价= ( 金额 / 数量) .
IF @INT_ID <=50
    SET @NVR_SQL1 = @NVR_SQL1 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF @INT_ID <=100
    SET @NVR_SQL2 = @NVR_SQL2 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=150
    SET @NVR_SQL3 = @NVR_SQL3 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=200
    SET @NVR_SQL4 = @NVR_SQL4 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=250
    SET @NVR_SQL5 = @NVR_SQL5 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=300
    SET @NVR_SQL6 = @NVR_SQL6 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=350
    SET @NVR_SQL7 = @NVR_SQL7 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=400
    SET @NVR_SQL8 = @NVR_SQL8 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=450
    SET @NVR_SQL9 = @NVR_SQL9 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=500
    SET @NVR_SQL10 = @NVR_SQL10 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=550
    SET @NVR_SQL11 = @NVR_SQL11 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=600
    SET @NVR_SQL12 = @NVR_SQL12 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=650
    SET @NVR_SQL13 = @NVR_SQL13 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=700
    SET @NVR_SQL14 = @NVR_SQL14 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=750
    SET @NVR_SQL15 = @NVR_SQL15 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=800
    SET @NVR_SQL16 = @NVR_SQL16 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=850
    SET @NVR_SQL17 = @NVR_SQL17 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=900
    SET @NVR_SQL18 = @NVR_SQL18 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=950
    SET @NVR_SQL19 = @NVR_SQL19 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
ELSE IF  @INT_ID <=1000
    SET @NVR_SQL20 = @NVR_SQL20 + ',SUM(CASE ' + @NVR_XCOL + ' WHEN ''' + @NVR_XCOLNAME + ''' THEN ' + @NVR_STATCOL + ' ELSE NULL END) AS [' + @NVR_XCOLNAME + ']' --构造查询
END -- WHILE (1 = 1)
--直接返回结果.
IF @NVR_ORDERBY='' BEGIN  --未指定排序字段.
EXECUTE ( @NVR_SQL0 + @NVR_SQL1 + @NVR_SQL2  + @NVR_SQL3 + @NVR_SQL4 + @NVR_SQL5 + @NVR_SQL6 + @NVR_SQL7 + @NVR_SQL8 + @NVR_SQL9
+ @NVR_SQL10 + @NVR_SQL11 + @NVR_SQL12  + @NVR_SQL13 + @NVR_SQL14 + @NVR_SQL15 + @NVR_SQL16 + @NVR_SQL17 + @NVR_SQL18 + @NVR_SQL19 + @NVR_SQL20
+ N' FROM ' + @NVR_TABNAME + N' ' + @NVR_WHERE + N' GROUP BY ' + @NVR_YCOL )                                                -- 执行
END ELSE BEGIN            --指定排序字段.
EXECUTE (N'SELECT * FROM (' +  @NVR_SQL0 + @NVR_SQL1 + @NVR_SQL2  + @NVR_SQL3 + @NVR_SQL4 + @NVR_SQL5 + @NVR_SQL6 + @NVR_SQL7 + @NVR_SQL8 + @NVR_SQL9
+ @NVR_SQL10 + @NVR_SQL11 + @NVR_SQL12  + @NVR_SQL13 + @NVR_SQL14 + @NVR_SQL15 + @NVR_SQL16 + @NVR_SQL17 + @NVR_SQL18 + @NVR_SQL19 + @NVR_SQL20
+ N' FROM ' + @NVR_TABNAME + N' ' + @NVR_WHERE + N' GROUP BY ' + @NVR_YCOL  + N') AS T86C6S9R ORDER BY ' + @NVR_ORDERBY )  -- 执行
END

CLOSE CORSS_CURSOR
DEALLOCATE CORSS_CURSOR
RETURN 0 --释放游标，返回0表示成功
END

GO

华芸智森
关注
专栏目录
sql server 2005 beta 2 transact-sql 增强功能
德仔
10-07 1539
<br />http://www.microsoft.com/china/msdn/library/data/sqlserver/05tsqlenhance.mspx?mfr=true<br />http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnsql90/html/sql_05tsqlenhance.asp<br /> <br /><br />sql server 2005 beta 2 transact-sql 增强功能
按任意的字段旋转的存储过程
weixin_33842304的博客
05-29 64
---------------------------------------------------------------------------- -- 分段截取函数 ---------------------------------------------------------------------------- CREATE    FUNCTION DBO.FUN_SplitStr(...
SQL2000一列转一行的存储过程
xueyang214的专栏
05-26 511
IF EXISTS(SELECT 1 FROM SYSOBJECTS WHERE ID=OBJECT_ID(LineToRow) AND TYPE=P)DROP PROC LineToRowGO--20100526 表中某一字段的记录转为一行字符串输出--@fields 表示表中的一个字段，@RecordSQL 查询语句Create  proc  dbo.LineToRow (@field
SQL Server 2005 术语词汇表
小旭的技术博客
10-08 2404
术语 定义 ActiveX 数据对象 (ActiveX Data Objects) 一种易于使用的应用程序编程接口 (API)，用于封装 OLE DB 以在诸如 Visual Basic、Visual Basic for Applicatio
Microsoft SQL Server 2005 Beta 2 白皮书
daniel_skybird的专栏
10-18 1278
<br />Microsoft SQL Server 2005 Beta 2<br />摘要：该白皮书介绍了 Microsoft SQL Server 2005 Beta 2 中的 Transact-SQL 的几个新的增强功能。这些新功能可以改善您的表达能力、查询性能以及错误管理功能。本文重点介绍几个概念新颖且互相联系的增强功能，并且通过实际示例演示这些功能。本文并未讨论所有新增的 Transact-SQL 功能。<br /><br />本页内容<br />简介和范围<br />改善查询的表达能力和 DRI
SQL Server 2005 中的商务智能和数据仓库
yangwl的专栏--商业智能blog
09-30 2660
微软发布了SQL Server 2005，对于微软与BI来说这是一个非常重要的版本，它完善了微软在BI方面的产品线。SQL Server 2005以及 Visual Studio .net2005的整合，有着庞大的开发用户，必将给BI领域的市场带来冲击。下面转载了一篇介绍性的文章共十部分，下面是第一部分，其他的请看回复。SQL Server 2005 中的商务智能和数据仓库(1)【导读】本文概述了
SQL Server 2005 Beta 2 Transact-SQL 增强功能
dz45693的专栏
02-18 3524
SQL Server 2005 Beta 2 Transact-SQL 增强功能
对象存储OSS云存储
weixin_41274719的博客
01-19 2785
一.阿里云OSS云存储简介 1.什么是阿里云oss云存储 阿里云对象存储服务（Object Storage Service，简称 OSS），是阿里云提供的海量、安全、低成 本、高可靠的云存储服务。其数据设计持久性不低于 99.9999999999%（12 个 9），服务设计可用性 （或业务连续性）不低于 99.995%。 可以使用阿里云提供的 API、SDK 接口或者 OSS 迁移工具轻松地将海量数据移入或移出阿里云 OSS。 数据存储到阿里云 OSS 以后，可以选择标准存储（Sta
《ClickHouse企业级应用：入门、进阶与实战》1 全面了解ClickHouse
热门推荐
AI天才研究院
01-31 1万+
近年来，ClickHouse发展势头迅猛，社区、大厂纷纷跟进使用。面对万亿级的数据查询分析也能做到亚秒级响应。那么，ClickHouse 到底是何方神圣？为什么如此受青睐？各位看官，欲知 ClickHouse 为何方神圣，且往下看。本章我们先来了解什么是ClickHouse，内容包括ClickHouse是什么，它具有哪些特性，适用哪些应用场景等。1.1 ClickHouse 概述本节介绍 ClickHouse 是什么、发展历程，以及ClickHouse在 OLAP 生态中的位置。同时，简单介绍了 OLAP
【硬刚大数据】2021年从零到大数据专家之Kudu篇
微信搜：import_bigdata，大数据领域硬核原创作者
08-14 680
欢迎关注博客主页：https://blog.csdn.net/u013411339 欢迎点赞、收藏、留言 ，欢迎留言交流！本文由【王知无】原创，首发于 CSDN博客！本文首发CSDN论坛，未经过官方和本人允许，严禁转载！ 本文是对《【硬刚大数据之学习路线篇】2021年从零到大数据专家的学习指南(全面升级版)》的面试部分补充。 硬刚大数据系列文章链接： 2021年从零到大数据专家的学习指南(全面升级版) 2021年从零到大数据专家之Hadoop/HDFS/Yarn篇 2021.
SQL Server 可观测最佳实践
观测云的博客
10-28 812
本实践介绍如何通过观测云监控自建的 SQL Server，帮助我们及时识别数据库性能瓶颈和潜在问题，确保数据库高效运行和稳定性。
【SQL】 Navicate 17 连接sql server
程序猿的学习路途博客
10-28 272
Navicate 17 连接sql server
PostgreSQL 约束
lly202406的博客
10-27 463
PostgreSQL 是一种功能强大的开源对象关系数据库系统，它提供了多种约束来确保数据的完整性和一致性。约束是数据库规则，用于限制表中数据的类型和操作。在 PostgreSQL 中，约束可以分为几种类型，包括主键约束、外键约束、唯一约束、检查约束和非空约束。
pgsql表分区和表分片设计
★【World Of Moshow 郑锴】★
10-31 329
在设计 PostgreSQL 表分区和表分片时，主要目标是提高查询性能、可扩展性和数据管理的效率。
sql题库中常见问答
最新发布
qq_42217078的博客
10-31 700
①、drop和truncate属于数据库的定义语言（DDL）②、delete属于数据库的操作语言（DML）③、drop可以删除全表结果，且删除的同时会删除表数据④、delete 和truncate只能删除表数据，truncate会删除表数据一起删除表结构并且创建一张空表⑤、delete可以带条件删除，truncate不能带条件删除。
好用的idea插件之自动sql生成
我是老伯的博客
10-24 791
自动化代码生成：智能提示与检测：高级映射与存储过程支持：自定义模板与配置：兼容性与持续更新：提升开发效率：优化开发流程：增强代码质量和一致性：易于集成和使用：选中想要生成的sql也可以根据上面路径定点生成
SQL Server存储过程基础语法详解
本文档深入介绍了SQL Server存储过程的基本语法，对于那些已经掌握了SQL语言基础的读者来说，是一份实用的参考材料。首先，我们来详细探讨以下几个关键知识点： 1. 定义变量： - 在SQL Server存储过程中，变量是...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值