码迷,mamicode.com
首页 > 数据库 > 详细

sql经典语句大全

时间:2014-07-29 10:45:16      阅读:402      评论:0      收藏:0      [点我收藏+]

标签:blog   http   os   数据   io   for   art   cti   

SQL Server提供了大量的函数, 
但是在一些常见的如, 
字符串拆分, 
字符提取,过滤等没有对应的处理, 
本帖主要收集一些常见的函数, 
整理如下: 
------------------------------ 
http://topic.csdn.net/u/20080306/23/d3c100f2-cda1-4efa-927d-f1f7968884ce.html 
/* 
功能:拆分字符串. 
作者:..... 
*/ 

http://topic.csdn.net/u/20080724/11/dacb530f-62ba-4417-a11a-fe2dee2172b4.html 
/* 
功能:根据身份证号码取得此CID所在省份 
作者:happyflystone 
*/ 

http://topic.csdn.net/u/20080713/00/77925c47-b7fa-4c1b-b307-0328e74a1c09.html 
/* 
功能:提取数字 
功能:提取英文 
功能:提取中文 
功能:过滤重复字符 
功能:过滤重复字符2 

作者:wzy_love_sly 
*/ 

MS SQL Server vs Oracle函数 
http://topic.csdn.net/u/20071022/09/477d57b8-1127-4159-8975-2055343c624f.html 

sql 函数 md5 
http://topic.csdn.net/u/20080619/09/4fb22d1b-f88e-487e-8b74-cf394263fc40.html 

求sql取字符串的首字母的函数 
http://topic.csdn.net/u/20080623/11/22a3f568-d37e-4bf5-9c13-64171066f582.html 

形如1,2,3,4,5,6的字符串转换成行 
http://topic.csdn.net/u/20080621/08/3397be02-47cd-40c3-9834-600cbb84c0bf.html 

小写金额转换成大写 
http://topic.csdn.net/u/20080118/11/80ff7847-20d9-45d8-9ed6-79933ced2cf8.html 

整数转换成二进制的函数 
http://topic.csdn.net/u/20071108/22/1650e0ef-3c14-4710-b2db-075f1e0badf3.html 

SQLserver中实现一个函数,能够将10进制转化为36进制 
http://topic.csdn.net/u/20070612/16/05e8b690-0818-479d-a34d-ee6258da4027.html 

http://blog.csdn.net/roy_88/archive/2007/11/13/1882106.aspx 
/* 
功能:十进制/十八进制的互转换(此方法应用于所有进制与10进制的转换) 
作者:roy_88 
*/ 

http://topic.csdn.net/u/20080715/10/548c6e12-731f-4e54-ac13-d05325068032.html 
/* 
功能:整数转换成二进制的函数 
作者:happyflystone 
*/ 

SQL Server里面有十六进制转化为十进制的函数吗 
http://topic.csdn.net/u/20070116/10/0c7d9ec1-acaa-4918-86cd-51516f7f517f.html 

SQL2000加密解密函数 
http://topic.csdn.net/t/20041202/20/3610469.html 

想通过一个函数或sql语句,随机生成任意6个字母组成的字符 
http://topic.csdn.net/u/20070627/17/ea906673-9821-46c6-b351-ab98a0b3d2c4.html 

求一个sql函数:计算时间差(除周六和周日外)的天数 
http://topic.csdn.net/u/20070322/12/2a8d5fcf-2d5b-49e1-b58a-c7277e15ee95.html 

Ip算法匹配 
http://topic.csdn.net/u/20080711/15/66639249-52d9-40c6-8f5c-131e49c1a6cf.html 
http://topic.csdn.net/u/20080801/11/506af00d-b882-41a2-99d9-4dc6927101fd.html 

http://blog.csdn.net/dobear_0922/archive/2007/12/18/1947219.aspx 
/* 
功能:SQL日历函数. 
作者:dobear_0922 
*/ 

http://topic.csdn.net/u/20080505/20/d2dffbbe-6d6b-41cf-b29a-41149540eafa.html 
/* 
功能:两个支持text字段内文字替换的存储过程 
作者:realgz 
*/ 

MS SQL Server 2000 中文模糊搜寻存储过程及函数 
http://www.cppfans.com/d_vcl_files/mssqlxp_chn.asp 


http://topic.csdn.net/t/20050419/10/3948336.html 
/* 
功能:全角/半角转换  
*/ 

http://topic.csdn.net/u/20080612/22/c850499f-bce3-4877-82d5-af2357857872.html 
/* 
功能:合并与拆分 
整理者:roy_88 
*/ 

http://topic.csdn.net/u/20080605/11/55c273aa-2206-4ded-b6f6-508a7a755c6a.html 
/* 
功能:自定义函数,用户可以调用这个函数判断指定的字符串是否符合正则表达式的规则. 
作者:ranzj 
*/ 

http://topic.csdn.net/u/20080804/20/09f3d937-d0b9-4892-ab01-fae3f38f0525.html 
/* 
功能:查找某个字符串第N次出现的位置 
作者:..... 
*/

 

T-SQL: 15 个与日期时间相关的精典语句函数

T-SQL: 15 个与日期时间相关的自定义函数(UDF),周日作为周的最后一天,均不受 @@DateFirst、语言版本影响
都是从老文章里收集或提炼出来的!
提示:
(@@Datefirst + datepart(weekday,@Date)) % 7 判断周几是最保险的! 与 @@DateFirst 无关,与语言版本无关
@@DateFirst 可能会导致 datepart(weekday,@Date) 不一样!
无论 @@DateFirst 等于几,无论是什么语言版本的 SQL Server 下面永远恒成立! (@@Datefirst + datepart(weekday,@Date)): 2、3、4、5、6、0、1 分别代表 周一 到 周日
-- */
create function udf_GetAge(@StartDate datetime,@EndDate datetime)
returns integer
-- 返回精确年龄 select dbo.udf_GetAge(‘1949-10-01‘,getdate())
begin
return datediff(year,@StartDate,@EndDate)
       - case when datediff(day,dateadd(year,datediff(year,@StartDate,@EndDate),@StartDate),@EndDate) >= 0
                   then 0
              else
                   1
         end
end
go

create function udf_DaysOfYearByDate(@Date datetime)
RETURNS integer
-- 返回年的天数 可判断 平(365)、润(366) 年
begin
return datediff(day,dateadd(year,datediff(year,0,@Date),0),dateadd(year,datediff(year,0,@Date )+1,0))
end
go
create function udf_DaysOfYear(@Year integer)
RETURNS integer
-- 返回年的天数 可判断 平(365)、润(366) 年
begin
return datediff(day,dateadd(year,@year - year(0),0),dateadd(year,@year - year(0) + 1,0))
end
go

create function udf_HalfDay(@Date datetime)
returns datetime
-- 返回 @Date 是 上午 返回 @Date 的零点,@Date 是 下午 返回 @Date 的十二点
as
begin
return case when datepart(hour,@Date) 
go
create function udf_WeekDiff(@StartDate datetime,@EndDate datetime)
returns integer
-- 返回 [@StartDate , @EndDate] 之间周数 周日是当周的最后一天
begin
return datediff(week,@StartDate,@EndDate) -- + 1
       + case when (@@Datefirst + datepart(weekday,@StartDate)) % 7 = 1
                   then 1
              else
                   0
         end
       - case when (@@Datefirst + datepart(weekday,@EndDate)) % 7 = 1
                   then 1
              else 0
         end
end
go

create function udf_WeekOfMonth(@Date datetime)
-- 返回 @Date 是所在月的第几周 周日是当周的最后一天
returns integer
as
begin
return datediff(week
                ,case when (@@Datefirst + datepart(weekday,dateadd(month,datediff(month,0,@Date),0))) % 7 = 1
                           then dateadd(month,datediff(month,0,@Date),0) - 1
                      else
                           dateadd(month,datediff(month,0,@Date),0)
                      end
                ,case when (@@Datefirst + datepart(weekday,@Date)) % 7 = 1
                           then @Date-1
                      else @Date
                 end
               ) + 1
end
go

create function udf_WeekOfQuarter(@Date datetime)
-- 返回 @Date 是所在季度的第几周 周日是当周的最后一天
returns int
as
begin
return datediff(week
                ,case when (@@Datefirst + datepart(weekday,dateadd(Quarter,datediff(Quarter,0,@Date),0))) % 7 = 1
                           then dateadd(Quarter,datediff(Quarter,0,@Date),0) - 1
                      else
                           dateadd(Quarter,datediff(Quarter,0,@Date),0)
                 end
                ,case when (@@Datefirst + datepart(weekday,@Date)) % 7 = 1
                           then @Date - 1
                      else
                           @Date
                 end
               ) + 1
end
go

create function udf_WeekOfYear(@Date datetime)
-- 返回 @Date 是所在年的第几周 周日是当周的最后一天
returns int
as
begin
return datediff(week
                ,case when (@@Datefirst + datepart(weekday,dateadd(day,0,datediff(day,0,dateadd(year,datediff(year,0,@Date),0))))) % 7 = 1
                           then dateadd(day,-1,dateadd(day,0,datediff(day,0,dateadd(year,datediff(year,0,@Date),0))))
                      else
                           dateadd(day,0,datediff(day,0,dateadd(year,datediff(year,0,@Date),0))) --date 所在年的第一天 即: 一月一号
                 end
                ,case when (@@Datefirst + datepart(weekday,@Date)) % 7 = 1
                           then dateadd(day,-1,@Date)
                      else
                           @Date
                 end
               ) + 1
end
go

create function udf_WeekDay(@ int,@Date datetime)
returns datetime
-- 返回 @Date 映射到 所在周的其他天 周日是当周的最后一天
begin
/*
--周日算作(上一)周的最后一天 
当 @ = 7 代表将 @Date 映射到 所在周的星期日
可用于按周汇总 Group by,均支持跨年跨月数据
*/
return dateadd(day
               ,case when (@@Datefirst + datepart(weekday,@Date)) % 7 = 0 --周六
                          then case when @ between 1 and 6
                                         then @ - 6
                                    else
                                         1
                               end
                     when (@@Datefirst + datepart(weekday,@Date)) % 7 = 1 --周日(七)
                          then case when @ between 1 and 6
                                         then @ - 7
                                    else
                                         0
                               end
                     when (@@Datefirst + datepart(weekday,@Date)) % 7 between 2 and 6 --周一至周五
                          then case when @ between 1 and 6
                                         then @ + 1 - (@@Datefirst + datepart(weekday,@Date)) % 7
                                    else
                                         8 - (@@Datefirst + datepart(weekday,@Date)) % 7
                               end
                end
               ,@Date)
end
go

create function udf_WeekdayDiff(@Weekday integer,@StartDate datetime,@EndDate datetime)
returns integer
-- -- 返回 [@StartDate , @EndDate] 之间周一 到 周日的个数 周日是当周的最后一天
begin
-- @Weekday: 1: Monday , ... ,7: Sunday
return datediff(week,@StartDate,@EndDate)
       + case when (@@Datefirst + datepart(weekday,@StartDate)) % 7
                   + case when (@@Datefirst + datepart(weekday,@StartDate)) % 7 = 0
                               then 7
                          else
                               0
                     end > @Weekday % 7 + 1
                   then 0
              else 1
         end
       - case when (@@Datefirst + datepart(weekday,@EndDate)) % 7
                   + case when (@@Datefirst + datepart(weekday,@EndDate)) % 7 = 0
                               then 7
                          else 0
                     end >= @Weekday % 7 + 1
                   then
                        0
              else
                   1
         end
/* test:
declare @b datetime
declare @e datetime
set @b = ‘2004-01-29‘
set @e = ‘2004-09-05‘
select @b as BeginDate ,@e as EndDate
,dbo.udf_WeekdayDiff(1,@b,@e) as CountOfMonday
,dbo.udf_WeekdayDiff(2,@b,@e) as CountOfTuesday
,dbo.udf_WeekdayDiff(3,@b,@e) as CountOfWednesday
,dbo.udf_WeekdayDiff(4,@b,@e) as CountOfThursday
,dbo.udf_WeekdayDiff(5,@b,@e) as CountOfFriday
,dbo.udf_WeekdayDiff(6,@b,@e) as CountOfSaturday
,dbo.udf_WeekdayDiff(7,@b,@e) as CountOfSunday
*/
end
go

create function udf_WeekdayID(@Date datetime)
returns integer
-- 返回 @Date 是 Monday 返回 1, ... ,是 Sunday 返回 1
begin
--1: Monday , ... ,7: Sunday
return (@@Datefirst + datepart(weekday,@Date)) % 7
       + case when (@@Datefirst + datepart(weekday,@Date)) % 7 
go

create function udf_NextWorkDate(@Date datetime)
returns datetime
-- 返回 @Date 的下一个工作日
begin
/*
declare @i int
set @i = 3
declare @Date datetime
set @Date = ‘2005-01-02‘
-- */
return case when (@@Datefirst + datepart(weekday,@Date)) % 7 = 6 -- Friday
                 then dateadd(day,3,@Date)
            when (@@Datefirst + datepart(weekday,@Date)) % 7 = 0 -- saturday
                 then dateadd(day,2,@Date)
            else
                 dateadd(day,1,@Date)
       end
end
go

create function udf_PreviousWorkDate(@Date datetime)
returns datetime
-- 返回 @Date 的上一个工作日
begin
/*
declare @i int
set @i = 3
declare @Date datetime
set @Date = ‘2005-01-02‘
-- */
return case when (@@Datefirst + datepart(weekday,@Date)) % 7 = 2 -- Monday
                 then dateadd(day,-3,@Date) 
            when (@@Datefirst + datepart(weekday,@Date)) % 7 = 1 -- Sunday
                 then dateadd(day,-2,@Date) 
            else
                 dateadd(day,-1,@Date) 
       end
end
go

create function udf_WorkDateAdd(@i integer,@Date datetime)
returns datetime
-- 返回 @Date 加上一段 @i 个工作日的新值
begin
declare @ int
set @ = 0
while @ = 0
                         then --dbo.udf_nextworkdate(@Date)
                              case when (@@Datefirst + datepart(weekday,@Date)) % 7 = 6 -- Friday
                                        then dateadd(day,3,@Date)
                                   when (@@Datefirst + datepart(weekday,@Date)) % 7 = 0 -- saturday
                                        then dateadd(day,2,@Date)
                                   else
                                        dateadd(day,1,@Date)
                              end
                    else
                         --dbo.udf_previousworkdate(@Date)
                         case when (@@Datefirst + datepart(weekday,@Date)) % 7 = 2 -- Monday
                                   then dateadd(day,-3,@Date)
                              when (@@Datefirst + datepart(weekday,@Date)) % 7 = 1 -- Sunday
                                   then dateadd(day,-2,@Date)
                              else
                                   dateadd(day,-1,@Date)
                         end
               end
               set @ = @ + 1 
end
return @Date
end
go

create function udf_GetStar (@ datetime)
RETURNS varchar(100)
-- 返回日期所属星座
BEGIN
RETURN
(
--declare @ datetime
--set @ = getdate()
select max(star)
from
(
select ‘魔羯座‘ as star,1 as [month],1 as [day]
union all select ‘水瓶座‘,1,20
union all select ‘双鱼座‘,2,19
union all select ‘牡羊座‘,3,21
union all select ‘金牛座‘,4,20
union all select ‘双子座‘,5,21
union all select ‘巨蟹座‘,6,22
union all select ‘狮子座‘,7,23
union all select ‘处女座‘,8,23
union all select ‘天秤座‘,9,23
union all select ‘天蝎座‘,10,24
union all select ‘射手座‘,11,22
union all select ‘魔羯座‘,12,22
) stars
where dateadd(month,[month] - 1,dateadd(year,year(@) - year(0),0)) + [day] - 1 =
(
select max(dateadd(month,[month] - 1,dateadd(year,year(@) - year(0),0)) + [day] - 1)
from (
select ‘魔羯座‘ as star,1 as [month],1 as [day]
union all select ‘水瓶座‘,1,20
union all select ‘双鱼座‘,2,19
union all select ‘牡羊座‘,3,21
union all select ‘金牛座‘,4,20
union all select ‘双子座‘,5,21
union all select ‘巨蟹座‘,6,22
union all select ‘狮子座‘,7,23
union all select ‘处女座‘,8,23
union all select ‘天秤座‘,9,23
union all select ‘天蝎座‘,10,24
union all select ‘射手座‘,11,22
union all select ‘魔羯座‘,12,22
) stars
where @ >= dateadd(month,[month] - 1,dateadd(year,year(@) - year(0),0)) + [day] - 1
)
)
end

SQL Server 日期算法

一周的第一天
select @@DATEFIRST

一个月的第一天  
select dateadd(mm,datediff(mm,0,getdate()),0)

本周的星期一  
select dateadd(wk,datediff(wk,0,getdate()),0)

一年的第一天  
SELECT  DATEADD(yy,  DATEDIFF(yy,0,getdate()),  0)  

季度的第一天  
SELECT  DATEADD(qq,  DATEDIFF(qq,0,getdate()),  0)  

当天的零时
SELECT  DATEADD(dd,  DATEDIFF(dd,0,getdate()),  0)  

上个月的最后一天  :本月第一天减2ms.
SELECT  dateadd(ms,-2,DATEADD(mm,  DATEDIFF(mm,0,getdate()),  0))  

本月的最后一天  
SELECT  dateadd(ms,-2,DATEADD(mm,  DATEDIFF(m,0,getdate())+1,  0)) 

本月的第一个星期一     

去掉时分秒  
DATEADD(day,  DATEDIFF(day,0,getdate()),  0)  
显示星期几  
select  datename(weekday,getdate())    
如何取得某个月的天数  
SELECT  Day(dateadd(ms,-3,DATEADD(mm,  DATEDIFF(m,0,getdate())+1,  0)))  

判断是否闰年:  
SELECT  case  day(dateadd(mm,  2,  dateadd(ms,-3,DATEADD(yy,  DATEDIFF(yy,0,getdate()),  0))))  
when  28  then  ‘平年‘  else  ‘闰年‘  end  
一个季度多少天  
declare  @m  tinyint,@time  smalldatetime  
select  @m=month(getdate())  
select  @m=case  when  @m  between  1  and  3  then  1  
                       when  @m  between  4  and  6  then  4  
                       when  @m  between  7  and  9  then  7  
                       else  10  end  
select  @time=datename(year,getdate())+‘-‘+convert(varchar(10),@m)+‘-01‘  
select  datediff(day,@time,dateadd(mm,3,@time))

 

 

SQL code

/*=============================================*/ /* Author: roy_88 */ --2 实现全角与半角字符转换的处理函数 CREATE FUNCTION f_Convert( @str NVARCHAR(4000), --要转换的字符串 @flag bit --转换标志,0转换成半角,1转换成全角 )RETURNS nvarchar(4000) AS BEGIN DECLARE @pat nvarchar(8),@step int,@i int,@spc int IF @flag=0 SELECT @pat=N‘%[!-~]%‘,@step=-65248, @str=REPLACE(@str,N‘ ‘,N‘ ‘) ELSE SELECT @pat=N‘%[!-~]%‘,@step=65248, @str=REPLACE(@str,N‘ ‘,N‘ ‘) SET @i=PATINDEX(@pat COLLATE LATIN1_GENERAL_BIN,@str) WHILE @i>0 SELECT @str=REPLACE(@str, SUBSTRING(@str,@i,1), NCHAR(UNICODE(SUBSTRING(@str,@i,1))+@step)) ,@i=PATINDEX(@pat COLLATE LATIN1_GENERAL_BIN,@str) RETURN(@str) END GO declare T_cursor cursor local for select a.Name, b.Name from sysobjects a join syscolumns b on a.ID=b.ID join systypes c on c.xusertype=b.Xtype where a.xtype=‘U‘ and c.Name in(‘nvarchar‘,‘nchar‘,‘varchar‘,‘char‘) declare @tabName sysname,@ColName sysname open T_cursor fetch next from T_cursor into @tabName,@ColName while @@fetch_status=0 begin exec(‘update ‘+@tabName+‘ set ‘+@ColName+‘=dbo.f_Convert(‘+@ColName+‘,0) where PATINDEX(N‘‘%[!-~]%‘‘ COLLATE LATIN1_GENERAL_BIN‘+‘,‘+@ColName+‘)>0‘ fetch next from T_cursor into @tabName,@ColName end close T_cursor deallocate T_cursor --------------------------------------- --改列的数据全角为半角 declare T_cursor cursor local for select a.Name, b.Name from sysobjects a join syscolumns b on a.ID=b.ID join systypes c on c.xusertype=b.Xtype where a.xtype=‘U‘ and c.Name in(‘nvarchar‘,‘nchar‘,‘varchar‘,‘char‘) declare @tabName sysname,@ColName sysname open T_cursor fetch next from T_cursor into @tabName,@ColName while @@fetch_status=0 begin exec(‘update ‘+@tabName+‘ set ‘+@ColName+‘=dbo.f_Convert(‘+@ColName+‘,0) where PATINDEX(N‘‘%[!-~]%‘‘ COLLATE LATIN1_GENERAL_BIN‘+‘,‘+@ColName+‘)>0‘)--少了) fetch next from T_cursor into @tabName,@ColName end close T_cursor deallocate T_cursor go --改列名全角为半角 declare T_cursor cursor local for select a.Name, b.Name from sysobjects a join syscolumns b on a.ID=b.ID where a.xtype=‘U‘ and PATINDEX(N‘%[!-~]%‘ COLLATE LATIN1_GENERAL_BIN,b.Name)>0 declare @tabName sysname,@ColName sysname open T_cursor fetch next from T_cursor into @tabName,@ColName while @@fetch_status=0 begin exec(‘exe sp_rename ‘‘‘+@tabName+‘.‘+@ColName+‘‘‘,‘‘dbo.f_Convert(‘+@ColName+‘,0)‘‘‘) fetch next from T_cursor into @tabName,@ColName end close T_cursor deallocate T_cursor ------------------------------------------------------ --改列名全角为半角 declare T_cursor cursor local for select a.Name+‘.‘+b.Name,NameNew=dbo.f_Convert(b.Name) from sysobjects a join syscolumns b on a.ID=b.ID where a.xtype=‘U‘ and PATINDEX(N‘%[!-~]%‘ COLLATE LATIN1_GENERAL_BIN,b.Name)>0 declare @tabName sysname,@ColName sysname open T_cursor fetch next from T_cursor into @tabName,@ColName while @@fetch_status=0 begin exe sp_rename @tabName,@ColName fetch next from T_cursor into @tabName,@ColName end close T_cursor deallocate T_cursor

就用树型表,可到N级.参考如下:

create table tb(id int, name varchar(10), pid int, px int)
insert into tb values(0 , ‘栏目分类‘, 0 , 1)
insert into tb values(1 , ‘动物‘ , 0 , 1) 
insert into tb values(2 , ‘视频‘ , 0 , 2) 
insert into tb values(3 , ‘老虎‘ , 1 , 1) 
insert into tb values(4 , ‘狮子‘ , 1 , 2) 
insert into tb values(5 , ‘搞笑‘ , 2 , 1) 
go

--查询指定节点及其所有子节点的函数 
CREATE FUNCTION f_Cid(@ID int) RETURNS @t_Level TABLE(ID int,Level int) 
AS 
BEGIN 
  DECLARE @Level int 
  SET @Level=1 
  INSERT @t_Level SELECT @ID,@Level 
  WHILE @@ROWCOUNT>0 
  BEGIN 
    SET @Level=@Level+1 
    INSERT @t_Level SELECT a.ID,@Level 
    FROM tb a,@t_Level b 
    WHERE a.PID=b.ID 
    AND b.Level=@Level-1 
  END 
  RETURN 
END 
GO 

--调用函数查询id = 1及其所有子节点 
SELECT a.* FROM tb a,f_Cid(1) b WHERE a.ID=b.ID 
/*
id          name       pid         px          
----------- ---------- ----------- ----------- 
1           动物         0           1
3           老虎         1           1
4           狮子         1           2
(所影响的行数为 3 行)
*/

drop table tb
drop function dbo.f_cid


--------------------------------

--BOM算法
--产品配件清单查询示例(邹建)
CREATE TABLE Item(ID int,Name varchar(10),Wast decimal(2,2))
INSERT Item SELECT 1,N‘A产品‘,0.01
UNION  ALL  SELECT 2,N‘B产品‘,0.02
UNION  ALL  SELECT 3,N‘C产品‘,0.10
UNION  ALL  SELECT 4,N‘D配件‘,0.15
UNION  ALL  SELECT 5,N‘E物料‘,0.03
UNION  ALL  SELECT 6,N‘F物料‘,0.01
UNION  ALL  SELECT 7,N‘G配件‘,0.02

CREATE TABLE Bom(ItemID int,ChildId int)
INSERT Bom SELECT 1,4
UNION  ALL SELECT 1,7   --A产品由D配件和G配件组成
UNION  ALL SELECT 2,1
UNION  ALL SELECT 2,6
UNION  ALL SELECT 2,7   --B产品由F物料及G配件组成
UNION  ALL SELECT 4,5
UNION  ALL SELECT 4,6    --D配件由F物料组成
UNION  ALL SELECT 3,2
UNION  ALL SELECT 3,1    --C产品由A产品和B产品组成
GO

CREATE FUNCTION f_Bom(
@ItemIDs varchar(1000), --要查询物料清单及生产量的产品编号列表(逗号分隔)
@Num   int          --要生产的数量
)RETURNS @t TABLE(ItemID int,ChildId int,Nums int,Level int)
AS
BEGIN
    DECLARE @Level int
    SET @Level=1
    INSERT @t SELECT a.ItemID,a.ChildId,ROUND(@Num/(1-b.Wast),0),@Level
    FROM Bom a,Item b
    WHERE a.ChildId=b.ID
        AND CHARINDEX(‘,‘+RTRIM(a.ItemID)+‘,‘,‘,‘+@ItemIDs+‘,‘)>0
    WHILE @@ROWCOUNT>0 and @Level<140
    BEGIN
        SET @Level=@Level+1
        INSERT @t SELECT a.ItemID,b.ChildId,ROUND(a.Nums/(1-c.Wast),0),@Level
        FROM @t a,Bom b,Item c
        WHERE a.ChildId=b.ItemID
            AND b.ChildId=c.ID
            AND a.Level=@Level-1
    END
    RETURN
END
GO

--调用函数展开产品1、2、3的结构及计算生产10个产品时,各需要多少个配件
SELECT a.ItemID,ItemName=b.Name,
    a.ChildId,ChildName=c.Name,
    a.Nums,a.Level
FROM f_Bom(‘1,2,3‘,10) a,Item b,Item c
WHERE a.ItemID=b.ID
    AND a.ChildId=c.ID
ORDER BY a.ItemID,a.Level,a.ChildId

/*
ItemID      ItemName   ChildId     ChildName  Nums        Level
----------- ---------- ----------- ---------- ----------- -----------
1           A产品        4           D配件        12          1
1           A产品        7           G配件        10          1
1           A产品        5           E物料        12          2
1           A产品        6           F物料        12          2
2           B产品        1           A产品        10          1
2           B产品        6           F物料        10          1
2           B产品        7           G配件        10          1
2           B产品        4           D配件        12          2
2           B产品        7           G配件        10          2
2           B产品        5           E物料        12          3
2           B产品        6           F物料        12          3
3           C产品        1           A产品        10          1
3           C产品        2           B产品        10          1
3           C产品        1           A产品        10          2
3           C产品        4           D配件        12          2
3           C产品        6           F物料        10          2
3           C产品        7           G配件        10          2
3           C产品        7           G配件        10          2
3           C产品        4           D配件        12          3
3           C产品        5           E物料        12          3
3           C产品        6           F物料        12          3
3           C产品        7           G配件        10          3
3           C产品        5           E物料        12          4
3           C产品        6           F物料        12          4

(24 row(s) affected)


*/
drop table item
drop table bom
drop function f_Bom

-------------------------------------------------------------
就用树型表,可到N级.参考如下:

create table tb(id int, name varchar(10), pid int, px int)
insert into tb values(0 , ‘栏目分类‘, 0 , 1)
insert into tb values(1 , ‘动物‘ , 0 , 1) 
insert into tb values(2 , ‘视频‘ , 0 , 2) 
insert into tb values(3 , ‘老虎‘ , 1 , 1) 
insert into tb values(4 , ‘狮子‘ , 1 , 2) 
insert into tb values(5 , ‘搞笑‘ , 2 , 1) 
go

--查询指定节点及其所有子节点的函数 
CREATE FUNCTION f_Cid(@ID int) RETURNS @t_Level TABLE(ID int,Level int) 
AS 
BEGIN 
  DECLARE @Level int 
  SET @Level=1 
  INSERT @t_Level SELECT @ID,@Level 
  WHILE @@ROWCOUNT>0 
  BEGIN 
    SET @Level=@Level+1 
    INSERT @t_Level SELECT a.ID,@Level 
    FROM tb a,@t_Level b 
    WHERE a.PID=b.ID 
    AND b.Level=@Level-1 
  END 
  RETURN 
END 
GO 

--调用函数查询id = 1及其所有子节点 
SELECT a.* FROM tb a,f_Cid(1) b WHERE a.ID=b.ID 
/*
id          name       pid         px          
----------- ---------- ----------- ----------- 
1           动物         0           1
3           老虎         1           1
4           狮子         1           2
(所影响的行数为 3 行)
*/

drop table tb
drop function dbo.f_cid
-----------------------------------------------------
--测试数据
CREATE TABLE tb(ID char(3),PID char(3),Name nvarchar(10))
INSERT tb SELECT ‘001‘,NULL ,‘山东省‘
UNION ALL SELECT ‘002‘,‘001‘,‘烟台市‘
UNION ALL SELECT ‘004‘,‘002‘,‘招远市‘
UNION ALL SELECT ‘003‘,‘001‘,‘青岛市‘
UNION ALL SELECT ‘005‘,NULL ,‘四会市‘
UNION ALL SELECT ‘006‘,‘005‘,‘清远市‘
UNION ALL SELECT ‘007‘,‘006‘,‘小分市‘
GO

--查询指定节点及其所有子节点的函数
CREATE FUNCTION f_Cid(@ID char(3))
RETURNS @t_Level TABLE(ID char(3),Level int)
AS
BEGIN
    DECLARE @Level int
    SET @Level=1
    INSERT @t_Level SELECT @ID,@Level
    WHILE @@ROWCOUNT>0
    BEGIN
        SET @Level=@Level+1
        INSERT @t_Level SELECT a.ID,@Level
        FROM tb a,@t_Level b
        WHERE a.PID=b.ID
            AND b.Level=@Level-1
    END
    RETURN
END
GO

--调用函数查询002及其所有子节点
SELECT a.*
FROM tb a,f_Cid(‘002‘) b
WHERE a.ID=b.ID
/*--结果
ID   PID  Name       
------ ------- ---------- 
002  001  烟台市
004  002  招远市
--*/



--测试数据
DECLARE @t TABLE(ID char(3),PID char(3),Name nvarchar(10))
INSERT @t SELECT ‘001‘,NULL ,‘山东省‘
UNION ALL SELECT ‘002‘,‘001‘,‘烟台市‘
UNION ALL SELECT ‘004‘,‘002‘,‘招远市‘
UNION ALL SELECT ‘003‘,‘001‘,‘青岛市‘
UNION ALL SELECT ‘005‘,NULL ,‘四会市‘
UNION ALL SELECT ‘006‘,‘005‘,‘清远市‘
UNION ALL SELECT ‘007‘,‘006‘,‘小分市‘

--深度排序显示处理
--生成每个节点的编码累计(相同当单编号法的编码)
DECLARE @t_Level TABLE(ID char(3),Level int,Sort varchar(8000))
DECLARE @Level int
SET @Level=0
INSERT @t_Level SELECT ID,@Level,ID
FROM @t
WHERE PID IS NULL
WHILE @@ROWCOUNT>0
BEGIN
    SET @Level=@Level+1
    INSERT @t_Level SELECT a.ID,@Level,b.Sort+a.ID
    FROM @t a,@t_Level b
    WHERE a.PID=b.ID
        AND b.Level=@Level-1
END

--显示结果
SELECT SPACE(b.Level*2)+‘|--‘+a.Name
FROM @t a,@t_Level b
WHERE a.ID=b.ID
ORDER BY b.Sort
/*--结果
|--山东省
  |--烟台市
    |--招远市
  |--青岛市
|--四会市
  |--清远市
    |--小分市
--*/
-----------------------------------------

sql经典语句大全,布布扣,bubuko.com

sql经典语句大全

标签:blog   http   os   数据   io   for   art   cti   

原文地址:http://www.cnblogs.com/wayne-ivan/p/3873780.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!