用SQL语句求排除断号的号码串

一用户对缴款日报中的票据号使用情况提出要求,希望以类似5-6,9-10,12-20的方式展现,以便直观地反映实际使用的票据号情况。

我们经过分析发现,实现这一需求的难点主要有两点:

1. 如果要找出断号,用SQL语句实现,主要是要考虑性能;

2. 将排除断后的使用号码段的多条记录转换为一行显示,即用SQL实现行列转换;

如果通过编程来实现,这两点都不难,但通过SQL来实现,则需要一些技巧。

 

假设知道已用票据号为3,4,5,7,8,11,12,最小为3,最大为12,求断号的SQL如下:

Select Rownum + (3 - 1)

From Dual

Connect By Rownum <= 12 - (3 - 1)

Minus

Select Column_Value Txt From Table(Cast(Zltools.f_Num2list('3,4,5,7,8,11,12') As Zltools.t_Numlist))

求出的结果是三条记录,6,9,10

其中用到一个技巧就是用Connect by Rownum来产生按顺序增长的记录集。

 

求转换为一行显示的已用票据段的SQL如下:

With TEST As(

Select Column_Value 编号 From Table(Cast(Zltools.f_Num2list('3,4,5,7,8,11,12') As Zltools.t_Numlist))

)

Select Substr(Max(LPAD(Length(分段), 5,'0') || 分段), 7, 1000) As 分段

From (

 Select Sys_Connect_By_Path(分段, ',') As 分段

 From (

    Select Rownum As 行号,A.起始号||'-'||(B.中断号-1) As 分段

    From (

      Select Rownum As 行号,编号 As 起始号

      From

        Select 编号 From TEST

        Minus

        Select 编号+1 From TEST)

        ) A,

        (Select Rownum As 行号,编号 As 中断号 From

        Select 编号+1 As 编号 From TEST

        Minus

        Select 编号 From TEST)

        ) B

      Where A.行号=B.行号)

    Start With 行号 = 1

 Connect By (行号-1) = Prior 行号)

查询结果: 3-5,7-8,11-12

其中用到以下技巧:

1. 用minus方式求已用号码段的起始号和终止号的记录集

2. Sys_Connect_By_Path函数和树型查询实现多行记录转换为一列

3. Substr,Max,LPAD,Length几个函数的组合来求最长的一条记录

 

如是Oracle 10G及以后的版本,可以使用一个新的函数Wmsys.Wm_Concat,比前面树型查询的速度要快很多。

With TEST As(

Select Column_Value 编号 From Table(Cast(Zltools.f_Num2list('3,4,5,7,8,11,12') As Zltools.t_Numlist))

)

Select Wmsys.Wm_Concat(分段) as 分段

 From (

    Select Rownum As 行号,A.起始号||'-'||(B.中断号-1) As 分段

    From (

      Select Rownum As 行号,编号 As 起始号

      From

        Select 编号 From TEST

        Minus

        Select 编号+1 From TEST)

        ) A,

        (Select Rownum As 行号,编号 As 中断号 From

        Select 编号+1 As 编号 From TEST

        Minus

        Select 编号 From TEST)

        ) B

      Where A.行号=B.行号)

原文地址:https://www.cnblogs.com/zyk/p/1552576.html