按BOM层次展开

nick_x_zh

是我搞错了，是可以运行。
我连到服务器上去了，我们服务器上是2000的。

Jason19841012

研究研究，拿走了，谢谢

kamkam

泪奔收藏

acpower

可以输入自定义条件吗？
如输入父料号，只展开这个料号的BOM？

eric_e

DECLARE @ItemCode NVARCHAR(40)
SET @ItemCode = '2001029002' -- = T0.ItemCode  FROM OITM T0 WHERE T0.ItemCode = '[%0]'


WITH Bom(Father, code, BomLevel,sort,warehouse,Qty,issue) AS
(


      SELECT CONVERT(NVARCHAR(40),N'')  Father ,T0.Code Code, 0 AS bomlevel, CONVERT(VARCHAR(255), @ItemCode) Sort ,ToWH WareHouse,Qauntity Quantity ,CONVERT(CHAR(1),'') Issuemthd
      FROM OITT T0
         WHERE Code = @itemCode
     
     UNION ALL
         
     SELECT CONVERT(NVARCHAR(40), T0.Father ) Father,  T0.Code , T1.Bomlevel + 1,CONVERT(VARCHAR(255),RTRIM(Sort)+T0.code),T0.Warehouse,T0.Quantity,T0.Issuemthd
         FROM ITT1 T0
                    INNER JOIN BOM T1
                        ON T0.Father = T1.Code
)


SELECT CASE WHEN T0.BomLevel=0 THEN  T0.Code ELSE NULL END  产成品,
       CASE WHEN T0.BomLevel=0 THEN  T1.ItemCode ELSE NULL END  成品名称,
       T0.BomLevel 深度,
       LEFT( '.                                             ',T0.BomLevel*4)+ ( CASE WHEN T0.BomLevel >0 THEN T0.Code ELSE N'' END) 物料编号,
       CASE WHEN T0.BomLevel >0 THEN T1.ItemName ELSE NULL END 物料描述,
       T0.Qty 用量,
       CASE T0.Issue WHEN 'M' THEN N'手动' WHEN 'B' THEN N'倒冲' END 发货方法
   FROM BOM T0
        JOIN OITM T1 WITH(NOLOCK) ON T0.Code = T1.Itemcode

acpower

谢谢eric_e ，测试后，做了小小的修改（下面蓝色加粗字体），能在我公司应用了。

declare @ItemCode nvarchar(20)
select @ItemCode=t0.code from oitt t0 where t0.code='[%0]';

WITH Bom(Father, code, BomLevel,sort,warehouse,Qty,issue) AS
(
      SELECT CONVERT(NVARCHAR(40),N'')  Father ,T0.Code Code, 0 AS bomlevel, CONVERT(VARCHAR(255), @ItemCode) Sort ,ToWH WareHouse,Qauntity Quantity ,CONVERT(CHAR(1),'') Issuemthd
      FROM OITT T0
         WHERE Code = @itemCode
     UNION ALL
     SELECT CONVERT(NVARCHAR(40), T0.Father ) Father,  T0.Code , T1.Bomlevel + 1,CONVERT(VARCHAR(255),RTRIM(Sort)+T0.code),T0.Warehouse,T0.Quantity,T0.Issuemthd
         FROM ITT1 T0
                    INNER JOIN BOM T1
                        ON T0.Father = T1.Code
)


SELECT CASE WHEN T0.BomLevel=0 THEN  T0.Code ELSE NULL END  产成品,
       CASE WHEN T0.BomLevel=0 THEN  T1.ItemName ELSE NULL END  成品名称,
       T0.BomLevel 深度,
       LEFT( '.                                             ',T0.BomLevel*4)+ ( CASE WHEN T0.BomLevel >0 THEN T0.Code ELSE N'' END) 物料编号,
       CASE WHEN T0.BomLevel >0 THEN T1.ItemName ELSE NULL END 物料描述,
       T0.Qty 用量,
       CASE T0.Issue WHEN 'M' THEN N'手动' WHEN 'B' THEN N'倒冲' END 发货方法
   FROM BOM T0
        JOIN OITM T1 WITH(NOLOCK) ON T0.Code = T1.Itemcode order by sort

[ 本帖最后由 acpower 于 2009-4-1 15:14 编辑 ]

eric_e

我是把陈华的代码改了一下,
大家还是应该互相学习,如果大家都能熟悉掌握SQL,我想会对B1这个事业有点小小的影响.

jollyface

非常感谢，不过代码有点问题吧，需要稍微改下,实际用量取错了，你深度2的用量还要X深度1的实际用量的的，要不然这个BOM取出来的深度2的结果绝对有误
请看下生产报表中的物料单报表

古雨

牛叉啊

wwwhx1111

楼主很强啊,顶了,下来试试!