BOM数据排序及分级显示

BOM数据排序及分级显示

--示例数据:
CREATE TABLE BomSub(Parent_item varchar(10),Sub_item varchar(10))
INSERT BomSubSELECT 'A','AA'
UNIONALLSELECT 'A','AB'
UNIONALLSELECT 'AA','AAA'
UNIONALLSELECT 'AA','AAB'
GO

问题描述:
Parent_item是父项，Sub_item是子项，根据根据父子关系排序，并生成每个项目的层次。对于示例数据，要求结果如下：
Parent_itemLEVEL
----------- -------
A0
|-AA1
|--AAA2
|--AAB2
|-AB1

（所影响的行数为 5 行）

--查询处理的存储过程
CREATE PROC P_QRY
AS
DECLARE @t TABLE(Parent_item varchar(10),Level int,Path varchar(8000))
DECLARE @l int
SET @l=0
INSERT @t SELECT DISTINCT Parent_item,@l,RIGHT(SPACE(20)+Parent_item,20)
FROM BomSub a
WHERE NOT EXISTS(
SELECT * FROM BomSub WHERE Sub_item=a.Parent_item)
WHILE @@ROWCOUNT>0
BEGIN
SET @l=@l+1
INSERT @t SELECT a.Sub_item,@l,b.Path+RIGHT(SPACE(20)+a.Sub_item,20)
FROM BomSub a,@t b
WHERE a.Parent_item=b.Parent_item AND b.Level=@l-1
END
SELECT Parent_item=CASE Level WHEN 0 THEN '' ELSE '|'+REPLICATE('-',Level) END+Parent_item,
Level
FROM @t
ORDER BY Path
GO

--调用
EXEC P_QRY

原帖地址