147.产品配件清单查询案例

谁践踏了优雅 2024-02-19 19:10 37阅读 0赞

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