千家信息网

将字符串分解成一个表(多行、多列)表值函数[ StrSplit_Tab]

发表于:2024-10-20 作者:千家信息网编辑
千家信息网最后更新 2024年10月20日,用一个字符串来描述一个表的内容,需要时用这个表值函数将其还原成一个表。由于无法预知表的列数量和列名,需要使用时进行 【行列转换】。此函数,也可以像[StrSplit]函数一样,将字符串分解成单列,只要
千家信息网最后更新 2024年10月20日将字符串分解成一个表(多行、多列)表值函数[ StrSplit_Tab]

用一个字符串来描述一个表的内容,需要时用这个表值函数将其还原成一个表。

由于无法预知表的列数量和列名,需要使用时进行 【行列转换】。

此函数,也可以像[StrSplit]函数一样,将字符串分解成单列,只要参数@ColumnStr=''

当然,也可以将表的列名存储在字符串中,....

下面是SQL代码:


FUNCTION [dbo].[StrSplit_Tab](
@String nvarchar(MAX) --待分割字符串
,@RowStr nvarchar(10) --行分割符
,@ColumnStr nvarchar(10)--列分割符

,@NullItem int=0 --是否保留【空元素】[item]的位置编号。不为0保留,为0不保留。

)returns @Tab table(

[Row] int --[Row]:行编号(1,2,3,4,5......)
,[Column]nvarchar(20) --[Column]:列编号(F1,F2,F3.....)
,[item] nvarchar(MAX)) --[item]:单元格元素
as
begin
IF ISNULL(@RowStr,'')='' begin --无【行分割符@RowStr】,返回原文
insert into @Tab([Row],[Column],[item]) VALUES (1,'',@String);
RETURN;
end;
SET @NullItem=ISNULL(@NullItem,0);

declare @Ritem nvarchar(MAX); --行文本
declare @begin as int=1,@end as int;--截取文本,起止位置
declare @RL AS int=LEN(@RowStr);--分隔符长度
declare @R AS int=0;--行号
--分解行
set @end=charindex(@RowStr,@String,@begin);
while(@end<>0)
begin
set @Ritem = substring(@String,@begin,@end-@begin);
IF @NullItem<>0 SET @R=@R+1;
IF len(@Ritem)>0 begin
--分解列 --自我调用
IF @NullItem=0 SET @R=@R+1;

insert into @Tab([Row],[Column],[item])
SELECT @R,'F'+CAST([Row] as nvarchar(50)),[item]
FROM [dbo].[StrSplit_Tab](@Ritem,@ColumnStr,'');
end;
set @begin=@end+@RL;
set @end=charindex(@RowStr,@String,@begin);
end
--末尾文本处理
set @Ritem = substring(@String,@begin,len(@String)+1-@begin);
IF len(@Ritem)>0 begin
SET @R=@R+1;
--分解列 --自我调用
insert into @Tab([Row],[Column],[item])
SELECT @R,'F'+CAST([Row] as nvarchar(50)),[item]
FROM [dbo].[StrSplit_Tab](@Ritem,@ColumnStr,'');
end;
return
end
--==============使用范例=====================

select [Row] as 'Row',

max([F1]) as 'F1',

max([F2]) as 'F2',

max([F3]) as 'F3'

from [dbo].[StrSplit_Tab](

';;:小康:342222199506186034;杨蓝:342222197909226046:;向凤:42282519890310110X;;杨玉:510227197510122765;;;'

,';'

,':'

,1)

pivot(

max([item]) for [Column]

in (F1,F2,F3)

)as B

group by [Row]

order by [Row] asc



0