日期:2014-05-17  浏览次数:20398 次

SQL 规则查询 #################################### 100%结贴
求一函数,实现如下功能:
示例
输入:“cccddecc”   输出:“3c2de2c”
输入:“adef”     输出:“adef”
输入:“pppppppp” 输出:“8p”

------解决方案--------------------
试试这个:

create function dbo.calc_str(@str varchar(1000))
returns varchar(1000)
as
begin

declare @v varchar(10)
declare @prev varchar(10)
declare @i int
declare @str_v varchar(1000)


declare cur cursor
for select SUBSTRING(v,s.number,1) v
from (select @str as v)t,master..spt_values s
where s.number> 0 and s.type = 'P'
and s.number <= LEN(@str)


set @i = 0
set @str_v = ''

open cur
fetch next from cur into @v

set @prev = @v

while @@FETCH_STATUS = 0
begin

if @v = @prev 
begin
   set @i = @i + 1
   
end
else
begin
   Set @str_v = @str_v + case when @i = 1 then @prev
  else CAST(@i as varchar)+@prev
 end 
   set @i = 1
end

set @prev = @v
fetch next from cur into @v

end

Set @str_v = @str_v + case when @i = 1 then @prev
  else CAST(@i as varchar)+@prev
 end 

close cur
deallocate cur

return @str_v
end
go


select dbo.calc_str(v) 
from
(
select 'cccddecc'  v union all
select 'adef' union all
select 'pppppppp'
)t
/*
3c2de2c
adef
8p
*/

------解决方案--------------------

create function dbo.fndfbb
(@x varchar(50)) returns varchar(50)
as
begin
declare @y varchar(50)
;with t as
(select b.number 'n',
        substring(a.s,b.number,1) 'x'
 from (select @x 's')a,master.dbo.spt_values b
 where b.type='P' and b.number between 1 and len(a.s)
),
u as
(select a.n,a.x,row_number() over(order by a.n) 'r'
 from t a
 left&nb