首页 / MSSQL / 数据库多级分类代码（MSSQL存储过程版)

数据库多级分类代码（MSSQL存储过程版)

内容导读

互联网集市收集整理的这篇技术教程文章主要介绍了数据库多级分类代码（MSSQL存储过程版)，小编现在分享给大家，供广大互联网技能从业者学习和参考。文章包含8774字，纯文字阅读大概需要13分钟。

内容图文

--****************************** -- 多级分类存储过程 -- WDFrog 2012-2-15 -- http://wdfrog.cnblogs.com --****************************** --****************************** --数据表定义 --****************************** if exists (select * from dbo.sysobjects where id = object_id(N‘[dbo].[Category]‘) and OBJECTPROPERTY(id, N‘IsUserTable‘) = 1) drop table [dbo].[Category] GO CREATE TABLE [dbo].[Category] ( [ClassID] [int] NOT NULL , [ClassName] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NOT NULL , [Code] [nvarchar] (200) COLLATE Chinese_PRC_CI_AS NOT NULL , [DataNum] [int] NULL , [Info] [nvarchar] (1000) COLLATE Chinese_PRC_CI_AS NULL ) ON [PRIMARY] GO ALTER TABLE [dbo].[Category] ADD CONSTRAINT [DF_Category_DataNum] DEFAULT (0) FOR [DataNum], CONSTRAINT [PK_Category] PRIMARY KEY CLUSTERED ( [ClassID] ) ON [PRIMARY] GO --************************* -- 添加分类存储过程 --*************************** if exists (select * from dbo.sysobjects where id = object_id(N‘[dbo].[Category_Add]‘) and OBJECTPROPERTY(id, N‘IsProcedure‘) = 1) drop procedure [dbo].[Category_Add] GO Create Proc Category_Add @ClassName nvarchar(50), @DataNum int , @Info nvarchar(1000), @ParentID int -- 0表示根类别 As Declare @EditCode int Declare @StepLen int Declare @matchStr nvarchar(50) Declare @typeCode nvarchar(50) Declare @Code nvarchar(200) Declare @MyCode nvarchar(200) Declare @ParentCode nvarchar(200) Declare @selfCode int Set @editCode=1 Set @StepLen=4 Set @matchStr=REPLICATE(‘_‘,@StepLen) --4个_ set @typeCode=‘‘ Set @Code=‘‘ Set @MyCode=‘‘ Set @selfCode=0 Set @ParentCode=‘‘ Select @ParentCode=Code From [Category] Where ClassID=@ParentID If(@editCode=1) Begin --获取子类中编号最大的Code,column.ParentCode + matchStr中 Select Top 1 @MyCode= Code From [Category] Where Code Like @ParentCode + @matchStr Order By Code DESC If @@ROWCOUNT >0 Begin Set @selfCode=Cast(Right(@MyCode,@StepLen) As Int ) +1 Set @typeCode=Replicate(‘0‘,@StepLen-1) + Cast(@selfCode As nvarchar) Set @typeCode=Right(@typeCode,@StepLen) Set @typeCode=@ParentCode + @TypeCode End Else Begin Set @typeCode=@ParentCode +Replicate(‘0‘,@StepLen-1)+‘1‘ End End Declare @ClassID int Set @ClassID=0 --获取最大ClassID Select @ClassId=Max(ClassID) From [Category] If Not @ClassID Is Null Begin Set @ClassId=@ClassID +1 End Else Begin Set @ClassID=1 End Insert into [Category] (ClassID,ClassName,Code,DataNum, Info) values (@ClassID,@ClassName,@typeCode,@DataNum, @Info) Select @ClassID As ClassID Go

 
 
--********************
-- 修改分类存储过程
--*********************
if exists (select * from dbo.sysobjects where id = object_id(N‘[dbo].[Category_Update]‘) and OBJECTPROPERTY(id, N‘IsProcedure‘) = 1)
drop procedure [dbo].[Category_Update]
GO
 
Create   Proc Category_Update
@ClassID int , --需要修改的ClassID
@ClassName nvarchar(50),
 
@Info nvarchar(1000),
@ParentID int
As
Declare @EditCode int
Declare @StepLen int
Declare @matchStr nvarchar(50)
Declare @typeCode nvarchar(50)
Declare @Code nvarchar(200)
Declare @MyCode nvarchar(200)
Declare @ParentCode nvarchar(200)
Declare @selfCode int
Set @editCode=0
Set @StepLen=4
Set @matchStr=REPLICATE(‘_‘,@StepLen) --4个_
set @typeCode=‘‘
Set @Code=‘‘
Set @MyCode=‘‘
Set @selfCode=0
Set @ParentCode=‘‘
 
 
Select @ParentCode=Code From [Category] Where ClassID=@ParentID
Select @Code=Code From [Category] Where ClassID=@ClassID
 
 
--修改原有类别
--确定是否要修改Code字段
--查看是否改变了直接父类别(上一级)
If @ParentCode != Left(@code,len(@code)-@StepLen)
    Begin
    --过滤选择自己做为父类
    If(@ParentCode !=@Code)
      Begin
        --过滤选择自己的子类为父类  
        If Len(@ParentCode) > Len(@Code)
        Begin
           --因为 Len(@ParentCode) > Len(@Code) 所以可以Left(@ParentCode,Len(@Code))
           If Left(@ParentCode,Len(@Code)) != @Code --如果相等则为选择自己的子类为父类  
            Begin
               Set @EditCode=1
            End
        End
        Else
        Begin
            Set @EditCode=1
        End
      End
     
    End    
 
 
If(@editCode=1)
    Begin
        --获取子类中编号最大的Code,column.ParentCode + matchStr中
    Select Top 1 @MyCode= Code From [Category] Where Code Like @ParentCode + @matchStr Order By Code DESC
    --是否有子类
    If @@ROWCOUNT >0
        Begin
        Set @selfCode=Cast(Right(@MyCode,@StepLen) As Int ) +1
        Set @typeCode=Replicate(‘0‘,@StepLen-1) + Cast(@selfCode As nvarchar)
                Set @typeCode=Right(@typeCode,@StepLen)
                Set @typeCode=@ParentCode + @TypeCode
        End
    Else --没有子类那么编号从1开始
        Begin
        Set @typeCode=@ParentCode +Replicate(‘0‘,@StepLen-1)+‘1‘
        End
    End
 
If (@editCode=1)
 Begin
   Update [Category] Set
    ClassName=@ClassName,Code=@typeCode, Info=@Info
   where ClassID=@ClassID
 End
Else
 Begin
   Update [Category] Set
     ClassName=@ClassName, Info=@Info
   where ClassID=@ClassID     
 End
---修改子类编号(Code)
If(@editCode=1)
   Begin
      Update [Category] Set
       Code=@typeCode + Right(Code,Len(Code)-Len(@Code))
      Where Code Like @Code + ‘%‘ 
   End
     
GO
 
--************************************
-- 删除一个分类，只允许删除没有子类的分类
--************************************
 
if exists (select * from dbo.sysobjects where id = object_id(N‘[dbo].[Category_Del]‘) and OBJECTPROPERTY(id, N‘IsProcedure‘) = 1)
drop procedure [dbo].[Category_Del]
GO
 
Create    Proc Category_Del
@ClassID int
As
If (Select Count(ClassID) From[Category] Where Code Like(Select Code From [Category] Where ClassID=@ClassID)+‘%‘ And ClassId <> @ClassId ) >0
    Begin
      RaisError (‘不能删除带有子类的分类‘,16,1)
      Return
    End
 
Declare @Code nvarchar(200)
Declare @Value int
Set @Value=0
Select @Code=[Code],@Value=[DataNum] From [Category] Where [ClassID]=@ClassID
Update [Category] Set [DataNum]=[DataNum] - @Value Where [ClassID] In( Select ClassID From [Category] Where Len(Code)<=Len(@Code) And Code=Left(@Code,Len(Code)))
Delete From Category  Where ClassID=@ClassID  
 
Go
 
--**************************
-- 根据编号获取一条分类记录
--***************************
 
if exists (select * from dbo.sysobjects where id = object_id(N‘[dbo].[Category_Select]‘) and OBJECTPROPERTY(id, N‘IsProcedure‘) = 1)
drop procedure [dbo].[Category_Select]
GO
 
Create  PROCEDURE Category_Select
    @ClassID int
AS
SELECT [ClassID],[ClassName],[Code],[DataNum], [Info]
 
FROM [Category] 
WHERE
    [ClassID]=@ClassID
Go  
 
 
--**************************
-- 移动分类的排序
--*******************************
if exists (select * from dbo.sysobjects where id = object_id(N‘[dbo].[Category_Move]‘) and OBJECTPROPERTY(id, N‘IsProcedure‘) = 1)
drop procedure [dbo].[Category_Move]
Go
 
Create     Proc Category_Move
@ClassID int,
@IsUp bit=1
As
Declare @maskStr nvarchar(200)
Declare @tempStr nvarchar(200)
Declare @Code nvarchar(200)
Set @Code=‘‘
Set @tempStr=‘‘
Select @Code=Code From [Category] Where ClassID=@ClassID
Set @maskStr=REPLICATE(N‘-‘,Len(@Code))
If  @Code !=‘‘ And ( (Len(@Code) % 4) =0 )
   Begin
     If(@isUp=1)
       Begin
         If(Len(@Code) > 4)
           Begin
             Select Top 1 @tempStr=Code From [Category] Where Len(Code)=Len(@Code) And Code < @Code And Left(Code,Len(Code)-4)=Left(@Code,Len(@Code)-4) Order By Code DESC
           End
         Else
           Begin
             Select Top 1  @tempStr=Code From [Category] Where Len(Code)=Len(@Code) And Code < @Code  Order By Code DESC
           End
       End
     Else
       Begin
         If(Len(@Code) >4)
           Begin
         Select Top 1 @tempStr=Code From [Category] Where Len(Code)=Len(@Code) And Code > @Code  And Left(Code,Len(Code)-4)=Left(@Code,Len(@Code)-4) Order By Code ASC
           End
         Else
           Begin
         Select Top 1 @tempStr=Code From [Category] Where Len(Code)=Len(@Code) And Code >@Code Order By  Code ASC
           End
       End
   End
-- //已经是最前(最后)
If @tempStr Is Null Or RTrim(LTrim(@tempStr))=‘‘
Begin
 return
End
 
Declare @CodeLen int
Declare @MAXLEN int
Set @CodeLen=Len(@Code)
Set @MAXLEN=200
--//设置目标类，以及目标类的子类为----0001(目标类)或----00010002(子类)为形式
Update [Category] Set Code=@maskStr +Substring(code,@CodeLen +1,@MAXLEN) Where Left(code,@CodeLen)=@tempStr
--//更新当前交换类(包括子类)Code为目标类Code
Update [Category] Set Code=@tempStr +Substring(Code,@CodeLen+1,@MAXLEN) Where Left(code,@CodeLen)=@Code
--//更新目标类（包括子类)Code为当前交换类Code
Update [Category] Set Code=@Code +Substring(code,@CodeLen +1,@MAXLEN) Where Left(code,@CodeLen)=@maskStr
 
Go
 
--****************************
--获取指定分类的父分类信息
--*****************************
if exists (select * from dbo.sysobjects where id = object_id(N‘[dbo].[Category_QueryParent]‘) and OBJECTPROPERTY(id, N‘IsProcedure‘) = 1)
drop procedure [dbo].[Category_QueryParent]
Go
 
Create   Proc Category_QueryParent
@ClassID int
As
Declare @ClassCode nvarchar(200)
Select @ClassCode=Code From [Category] Where ClassId=@ClassID
Select ClassID,ClassName,Code, DataNum
       From [Category]
       Where  Len(Code)<=Len(@ClassCode)
       And Code = Left(@ClassCode,Len(Code))
       Order By Code 
        
        
Go
 
--******************************
-- 获取整个分类目录
--******************************
if exists (select * from dbo.sysobjects where id = object_id(N‘[dbo].[Category_Query]‘) and OBJECTPROPERTY(id, N‘IsProcedure‘) = 1)
drop procedure [dbo].[Category_Query]
Go
 
Create Proc Category_Query
As
<sp


           
                本文系统来源：http://www.cnblogs.com/msony924840/p/4871049.html

内容总结

以上是互联网集市为您收集整理的数据库多级分类代码（MSSQL存储过程版)全部内容，希望文章能够帮你解决数据库多级分类代码（MSSQL存储过程版)所遇到的程序开发问题。如果觉得互联网集市技术教程内容还不错，欢迎将互联网集市网站推荐给程序员好友。

内容备注

版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容，请发送邮件至 gblab@vip.qq.com 举报，一经查实，本站将立刻删除。

内容手机端

扫描二维码推送至手机访问。

本文链接：https://qyyshop.com/info/457882.html

来源：【匿名】

【上一篇】SQL Server ->> 查看SQL Server备份历史【下一篇】一个odbc连mssql分页的类

更多 ►

【数据库多级分类代码（MSSQL存储过程版)】教程文章相关的互联网学习教程文章

MSSQL存储过程实现拼接sql的注意点【代码】

这里我昨天碰到的问题就是执行一段根据变量tableName对不同的表进行字段状态的更改。由于服务器原因，我不能直接在数据访问层写SQL，所以只好抽离出来放到存储过程里面。这里就出现了一个问题，我花费了好久才弄通！　　其实就是很简单的一个SQL语句：　　update table1 set field1=value1,field2 = value2 where id = id　　我写成什么样子了呢？大家且看：　declare@tableNamenvarchar(50),@field1int,@field2nvarchar,@idintdec...

MSSQL手札三 MSSQL存储过程【代码】

--存储过程完成一段sql代码的封装createproc trim --参数列表，多个间用逗号分隔@strvarchar(10) as--自定义代码段declare@str1varchar(10) set@str1=LTRIM(RTRIM(@str)) print@str1--使用存储过程exec trim ‘ abc ‘--‘abc‘ --===带输出参数的存储过程 --求两个数的和createproc sum1 @num1int, @num2int, @resultint output--表示这个参数可以将结果带出存储过程asset@result=@num1+@num2declare@r1intexec sum1 1,2,@r1 outp...

MSSQL存储过程1【代码】

ALTER PROCEDURE SP_TEST ASBEGINif 1=0SELECT UserName,TrainerID,TrainerInfoID FROM T_TrainerInfo;elseselect * from T_UserInfo; ENDGO原文：http://my.oschina.net/0x4ad/blog/413895

SQL Server 存储过程【代码】

Transact-SQL中的存储过程，非常类似于Java语言中的方法，它可以重复调用。当存储过程执行一次后，可以将语句缓存中，这样下次执行的时候直接使用缓存中的语句。这样就可以提高存储过程的性能。? 存储过程的概念存储过程Procedure是一组为了完成特定功能的SQL语句集合，经编译后存储在数据库中，用户通过指定存储过程的名称并给出参数来执行。存储过程中可以包含逻辑控制语句和数据操纵语句，它可以接受参数、输出参数、返...

sql server存储过程简单使用【代码】【图】

1 创建存储过程　　1.1 创建简单的存储过程　　　创建语句：createproc usp_helloworld asbeginprint‘Hello World‘end　　创建完后，调用语句格式 exec + 存储过程名：exec usp_helloworld执行结果：　　1.2 创建带参数的存储过程　　　语句：createproc usp_book @namenvarchar(50), @authornvarchar(50) asbeginselect*from book where name=@nameand author=@authorend　　表中的数据：　　调用存储过程，因为定义两个参数，在...

SqlServer中存储过程 returnC#代码处理以及对应的MySQL如何改写【代码】

一.SqlServer 中 1. 创建表 createtable testuser(id int, --primary key,names varchar(50),address varchar(50),paw varchar(50) )2.创建存储过程createproc testp12(@idint ,@namesvarchar(50),@addressvarchar(50),@pawvarchar(50)) asbegindeclare@maxidintif@idisnullor@id<5beginreturn-1;end--set IDENTITY_INSERT testuser oninsertinto testuser(id,names,address,paw)values(@id,@names,@address,@paw) --set IDENTITY_...

SQL server 变量if，while，存储过程【图】

一.变量1.if循环 2.3.while循环declare @ss int 　　set @ss =2while @ss<10begin 　　print ‘Hello‘ 　　set @ss=@ss+1end　　--break 跳出循环　　declare @sss int 　　set @sss=2　　while @sss<10begin 　　print‘Hello‘ 　　set @sss=@sss+1if @sss=6 　　breakend　　--continue 跳出本次循环，继续下次循环　　declare @ssss int 　　set @ssss=2while @ssss<10begin 　　set @ssss=@ssss+1 if @ssss>4an...

sqlserver关于分页存储过程的优化【让数据库按我们的意思执行查询计划】

复制代码代码如下:--代码一DECLARE @cc INT SELECT NewsId,ROW_NUMBER() OVER(ORDER BY SortNum DESC) AS RowIndex INTO #tb FROM news WITH(NOLOCK) WHERE NewsTypeId=@NewsTypeId AND IsShow=1 SET @cc = @@ROWCOUNT SELECT n.* FROM news AS n WITH(NOLOCK), #tb As t WHERE t.RowIndex>@PageIndex*@PageSize AND t.RowIndex<=(@PageIndex+1)*@PageSize AND t.newsid=n.newsid SELECT @cc DROP TABLE #tb 复制代码代码如下:--...

SQL server 2008里面通过sys.dm_exec_procedure_stats得到存储过程的执行信息--转【代码】

--转自：http://blogs.msdn.com/b/apgcdsd/archive/2011/05/13/sql-server-2008-sys-dm-exec-procedure-stats.aspx很多DBA都希望能够得到某个存储过程的执行信息,比如: 1) 执行了多少次2) 执行的执行计划如何3) 执行的平均读写如何4) 执行平均需要多少时间等等. 幸运的是SQL server 2008 提供了一个这样的DMV，使得我们比较容易就得到上面的信息。这个DMV是sys.dm_exec_procedure_stats，它输出了下面的信...

SQL Server常用系统存储过程大全

1. sp_help 报告有关数据库对象（sys.sysobjects 兼容视图中列出的所有对象）　 sp_help 表名称,存储过程名称等2. sp_helpdb 报告有关数据库的有效信息 sp_helpdb 数据库名称3. sp_helptext 默认值,未加密的transact-SQL存储过程.用户定义Transaction-SQL函数.触发器.计算列,CHECK约束,视图活系统对象　　sp_helptext 存储过程名称等4 sp_helpindex 查看有关表或视图上的索引的信息　 sp_helpindex ...

.net SQLSERVER 分页存储过程

create PROCEDURE [dbo].[proc_SplitPage]@tblName varchar(255), -- 表名@strFields varchar(1000) = ‘*‘, -- 需要返回的列，默认*@strOrder varchar(255)=‘‘, -- 排序的字段名，必填@strOrderType varchar(10)=‘ASC‘, -- 排序的方式,默认ASC@PageSize int = 10, -- 页尺寸,默认10@PageIndex int = 1, -- 页码,默认1@strWhere varchar(1500) = ‘‘ -- 查询条件 (注意: 不要加 where)ASd...

一次性压缩Sqlserver2005中所有库日志的存储过程

通过下面这个可以执行单个数据库日志压缩，问题每次都要写数据库名字，日志大的话执行速度没有那么快有没有办法更快一点？有没有办法一次性收缩所有数据库？代码如下:alter database 数据库名 set recovery simple go dbcc shrinkdatabase (数据库名) go alter database 数据库名 set recovery full go 目前也有压缩日志的工具，一个B/S界面形式的操作压缩数据库的，就是在选择数据库的时候老需要重新去选择具体的库，而且数据...

压缩SQLServer数据库日志的一个存储过程

use master --注意,此存储过程要建在master数据库中 go if exists (select * from dbo.sysobjects where id = object_id(N[dbo].[p_compdb]) and OBJECTPROPERTY(id, NIsProcedure) = 1) drop procedure [dbo].[p_compdb] GO create proc p_compdb @dbnause master --注意,此存储过程要建在master数据库中go if exists (select * from dbo.sysobjects where id = object_id(N[dbo].[p_compdb]) and OBJECTPROPERTY(id, NIsProcedu...

一次性压缩Sqlserver2005中所有库日志的存储过程

有没有办法更快一点？有没有办法一次性收缩所有数据库？代码如下: alter database 数据库名 set recovery simple go dbcc shrinkdatabase (数据库名) go alter database 数据库名 set recovery full go 目前也有压缩日志的工具，一个B/S界面形式的操作压缩数据库的，就是在选择数据库的时候老需要重新去选择具体的库，而且数据库数量很大的时候，有些库被压缩了，并没有自动排序; 目前需要的是被压缩后的数据库自动滚到最后面，...

SQLSERVER临时表导致存储过程重编译(recompile)的一些探讨_MySQL【图】

SQLSERVER为了确保返回正确的值，或者处于性能上的顾虑，有意不重用缓存在内存里的执行计划，而重新编译执行计划的这种行为，被称为重编译（recompile）。那么引发存储过程重编译的条件有哪一些呢？下面罗列了一些导致重编译（recompile）的条件：- 对查询所引用的表或视图进行更改（ALTER TABLE 和 ALTER VIEW）。- 对执行计划所使用的任何索引进行更改。- 对执行计划所使用的统计信息进行更新，这些更新可能是从语句（如 UPDATE ...

首页 / MSSQL / 数据库多级分类代码（MSSQL存储过程版)

数据库多级分类代码（MSSQL存储过程版)

内容导读

内容图文

内容总结

内容备注

内容手机端

【数据库多级分类代码（MSSQL存储过程版)】教程文章相关的互联网学习教程文章

MSSQL存储过程实现拼接sql的注意点【代码】

MSSQL手札三 MSSQL存储过程【代码】

MSSQL存储过程1【代码】

SQL Server 存储过程【代码】

sql server存储过程简单使用【代码】【图】

SqlServer中存储过程 returnC#代码处理以及对应的MySQL如何改写【代码】

SQL server 变量if，while，存储过程【图】

sqlserver关于分页存储过程的优化【让数据库按我们的意思执行查询计划】

SQL server 2008里面通过sys.dm_exec_procedure_stats得到存储过程的执行信息--转【代码】

SQL Server常用系统存储过程大全

.net SQLSERVER 分页存储过程

一次性压缩Sqlserver2005中所有库日志的存储过程

压缩SQLServer数据库日志的一个存储过程

一次性压缩Sqlserver2005中所有库日志的存储过程

SQLSERVER临时表导致存储过程重编译(recompile)的一些探讨_MySQL【图】

MSSQL - 相关标签

存储过程 - 相关标签

数据库 - 相关标签

MSSQL - 最新教程

MSSQL - 最热教程