根据BOM多级展开查询产品采购件

最新推荐文章于 2024-08-26 16:50:37 发布
最新推荐文章于 2024-08-26 16:50:37 发布
阅读量1.5k 收藏 5
点赞数
分类专栏： 金蝶K3二次开发 文章标签： 产品 null insert join table output

  根据BOM多级展开查找产品采购件，另外在EXCEL中做了一个宏来取数（需要修改连接数据库内容），可多次输入成品代码分别取出数据并保存
set ANSI_NULLS ON
set QUOTED_IDENTIFIER ON
go

 

create PROCEDURE [dbo].[aaa_BomExpand]
(
@FNumber varchar(100),
@ExpandLevel int=50, ----展开级数
@Order smallint=1,  ----排序方式 0 自然顺序 ，1 物料代码，2 物料名称
@BeginDay datetime='19000101 12:00:00:000AM', --子项物料生效日期  
@EndDay datetime='21000101 12:00:00:000AM' --子项物料失效日期  
--@Succeed smallint OUTPUT,----是否成功
--@Reason varchar(400) OUTPUT ----失败原因
)
AS
 SET NOCOUNT ON
 Create Table #Mutidata (  FIndex int IDENTITY,FEntryID INT, FBomInterid int, FItemID int null, FNeedQty decimal(28,14) default(0) null, FBOMLevel int null, FItemType 
 int null, FParentID int default(0)null, FRate   decimal(28,14) default(0) null, FHistory int default(0) null, FHaveMrp smallint default(0) null, FLevelString 
 varchar(200) null, FBom int, FMaterielType int  default(371) null,FOperSN Int NULL DEFAULT(0),FOperID int default(0)) 
 
 Create Table #MutiParentItem(  FIndex int IDENTITY,FEntryID INT default(0), FBomInterid int, FItemID int null, FNeedQty decimal(28,14) default(0) null, FBOMLevel 
 int null, FItemType int null,  FParentID int default(0)null, FRate   decimal(28,14) default(0) null, FHistory int default(0) null, FHaveMrp smallint default(0) null, 
 FLevelString varchar(200) null , FBom int, FMaterielType int  default(371) null,FOperSN Int NULL DEFAULT(0),FOperID int default(0)) 
 Create Table #Errors ( FIndex int IDENTITY, FType smallint default(0), FErrText nvarchar(355) )
 
 Insert into #mutiParentItem (fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FBom) Select a.finterid, t1.FItemID,a.fqty, 0,0,(case t5.FID when 'WG' then 0 
 when 'ZZ' then 1 when 'WWJG' then 1 else 2 end) FItemtype,t1.FItemID From icbom a
 inner join t_ICItem t1 on t1.FItemID = a.fitemid
 left join t_Submessage t5 on t1.FErpClsID = t5.FInterID 
 where t5.FTypeID = 210 and  t1.fnumber=@FNumber and a.fusestatus=1072

 DECLARE @BOMMaxLevel smallint
 DECLARE @BOMLevel smallint
 DECLARE @SelectRows int
 DECLARE @ParentBomID int
 DECLARE @ParentNeedQty decimal(28,14)
 DECLARE @ParentIndex int
 DECLARE @ParentItemID int
 DECLARE @ParentHaveMrp int
 DECLARE @ParentLevelString varchar(200)
 DECLARE @ParentBomLevel int
 DECLARE @ParentHistory int
 DECLARE @ExpandMode int
 DECLARE @FItemType int
 DECLARE @FBom int
 DECLARE @FMaterielType int
 DECLARE @FBomInterid int
 DECLARE @sHideDisabledMaterial varchar(50)
 DECLARE @sLongNumber varchar(50)
 SELECT @BOMMaxLevel = 50
 SELECT @BOMLevel =0
 SELECT @SelectRows = 0
 SELECT @ExpandMode=0
 --SET @Succeed=0
 --SET @Reason=''
 SET @sLongNumber = '0'
 SELECT @sLongNumber  = isnull(fvalue,'0') FROM t_systemprofile WHERE fkey = 'UseShortNumber' AND FCategory = 'IC'
 SET @sLongNumber = rtrim(@sLongNumber)
 SELECT @sHideDisabledMaterial = RTRIM(ISNULL(FValue,'0')) FROM t_SystemProfile WHERE FKey = 'HideDisabledMaterial' AND FCategory = 'IC'
 IF @ExpandLevel=0
  SELECT @ExpandLevel=50
 UPDATE #MutiParentItem SET FHaveMrp = 1
 ------如果是特征类物料，展开到第一层为止
 SELECT TOP 1 @FBomInterid=fbominterid  , @ParentIndex=u1.FIndex,@ParentItemID=u1.Fitemid,@ParentNeedQty=u1.FNeedQty,@ParentBomLevel=u1.FBOMLevel,
  @ParentHaveMrp=u1.FHaveMrp,@ParentLevelString=u1.FLevelString,@ParentHistory=u1.FHistory ,@FItemType=u1.FItemType ,@FBom=u1.FBom,@FMaterielType=u1.FMaterielType
 FROM #MutiParentItem u1 ORDER BY FIndex DESC  
 --系统参数“屏蔽BOM中的失效物料”为1，则只展开有效的子项物料
 --过滤条件：v2.FBeginDay <= @EndDay AND v2.FEndDay >= @BeginDay 
 --含义：物料有效期间与参数时间区间有交集为有效
 IF @sHideDisabledMaterial = '1'
 BEGIN
  IF @Order=0
  BEGIN
   INSERT INTO #MutiParentItem(FEntryID ,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
   SELECT V2.FEntryID,v2.finterid,
    v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15) ) * CAST(((  CAST( v2.FQty AS Decimal(28,15) ) / CAST(v1.FQty AS Decimal(28,15) )   )) AS Decimal(28,15)) FNeedQty, 1,
    @parentIndex FParentID,t1.FErpClsID FItemtype,
    v2.FQty / v1.FQty FRate,@ParentHistory ,0,@FBom,v2.FMaterielType,v2.FOperID
   FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
   WHERE  v1.Finterid=@FBomInterid  AND v2.Finterid = v1.FInterID
    AND v2.FItemID = t1.FItemID AND v2.FBeginDay <= @EndDay AND v2.FEndDay >= @BeginDay ORDER BY v2.FEntryID
  END
  ELSE IF @order=1
  BEGIN
   IF @sLongNumber = '0'
    INSERT INTO #MutiParentItem(FEntryID,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
    SELECT FEntryID,v2.finterid,
       v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15)) * CAST(((CAST(v2.FQty AS Decimal(28,15))/ CAST(v1.FQty AS Decimal(28,15)))) AS Decimal(28,15)) FNeedQty, 1,
       @parentIndex FParentID,t1.FErpClsID FItemtype,
       v2.FQty / v1.FQty FRate,@ParentHistory ,0,@FBom,v2.FMaterielType,v2.FOperID
    FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
    WHERE  v1.Finterid=@FBomInterid  AND v2.Finterid = v1.FInterID
     AND v2.FItemID = t1.FItemID AND v2.FBeginDay <= @EndDay AND v2.FEndDay >= @BeginDay ORDER BY t1.fnumber
       ELSE
    INSERT INTO #MutiParentItem(FEntryID,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
    SELECT FEntryID,v2.finterid,
     v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15)) * CAST(((CAST(v2.FQty AS Decimal(28,15))/ CAST(v1.FQty AS Decimal(28,15) ))) AS Decimal(28,15) ) FNeedQty, 1,
     @parentIndex FParentID,t1.FErpClsID FItemtype,
     v2.FQty / v1.FQty FRate,@ParentHistory ,0,@FBom,v2.FMaterielType,v2.FOperID
    FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
    WHERE  v1.Finterid=@FBomInterid  AND v2.Finterid = v1.FInterID
     AND v2.FItemID = t1.FItemID AND v2.FBeginDay <= @EndDay AND v2.FEndDay >= @BeginDay ORDER BY t1.fshortnumber
  END
  ELSE
  BEGIN
   INSERT INTO #MutiParentItem(FEntryID,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
   SELECT V2.FEntryID,v2.finterid,
    v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15)) * CAST(((CAST(v2.FQty AS Decimal(28,15))/ CAST(v1.FQty AS Decimal(28,15)))) AS Decimal(28,15)) FNeedQty, 1,
    @parentIndex FParentID,t1.FErpClsID FItemtype,
    v2.FQty / v1.FQty FRate,@ParentHistory ,0,@FBom,v2.FMaterielType,v2.FOperID
   FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
   WHERE  v1.Finterid=@FBomInterid  AND v2.Finterid = v1.FInterID
    AND v2.FItemID = t1.FItemID AND v2.FBeginDay <= @EndDay AND v2.FEndDay >= @BeginDay ORDER BY t1.fname
  END
 END
 ELSE
 BEGIN
  IF @Order=0
  BEGIN
   INSERT INTO #MutiParentItem(FEntryID ,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
   SELECT V2.FEntryID,v2.finterid,
    v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15)) * CAST(((CAST(v2.FQty AS Decimal(28,15)) / CAST(v1.FQty AS Decimal(28,15)))) AS Decimal(28,15)) FNeedQty, 1,
    @parentIndex FParentID,t1.FErpClsID FItemtype,
    v2.FQty / v1.FQty FRate,@ParentHistory ,0,@FBom,v2.FMaterielType,v2.FOperID
   FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
   WHERE  v1.Finterid=@FBomInterid  AND v2.Finterid = v1.FInterID
    AND v2.FItemID = t1.FItemID ORDER BY v2.FEntryID
  END
  ELSE IF @order=1
  BEGIN
   IF @sLongNumber = '0'
    INSERT INTO #MutiParentItem(FEntryID,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
    SELECT FEntryID,v2.finterid,
     v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15)) * CAST(((CAST(v2.FQty AS Decimal(28,15))/ CAST(v1.FQty AS Decimal(28,15)))) AS Decimal(28,15)) FNeedQty, 1,
     @parentIndex FParentID,t1.FErpClsID FItemtype,
     v2.FQty / v1.FQty FRate,@ParentHistory ,0,@FBom,v2.FMaterielType,v2.FOperID
    FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
    WHERE  v1.Finterid=@FBomInterid  AND v2.Finterid = v1.FInterID
     AND v2.FItemID = t1.FItemID ORDER BY t1.fnumber
   ELSE
    INSERT INTO #MutiParentItem(FEntryID,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
    SELECT FEntryID,v2.finterid,
     v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15)) * CAST(((CAST(v2.FQty AS Decimal(28,15))/ CAST(v1.FQty AS Decimal(28,15)))) AS Decimal(28,15)) FNeedQty, 1,
     @parentIndex FParentID,t1.FErpClsID FItemtype,
     v2.FQty / v1.FQty FRate,@ParentHistory ,0,@FBom,v2.FMaterielType,v2.FOperID
    FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
    WHERE  v1.Finterid=@FBomInterid  AND v2.Finterid = v1.FInterID
     AND v2.FItemID = t1.FItemID ORDER BY t1.fshortnumber
  END
  ELSE
  BEGIN
   INSERT INTO #MutiParentItem(FEntryID,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
   SELECT V2.FEntryID,v2.finterid,
    v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15)) * CAST(((CAST(v2.FQty AS Decimal(28,15))/ CAST(v1.FQty AS Decimal(28,15)))) AS Decimal(28,15)) FNeedQty, 1,
    @parentIndex FParentID,t1.FErpClsID FItemtype,
    v2.FQty / v1.FQty FRate,@ParentHistory ,0,@FBom,v2.FMaterielType,v2.FOperID
   FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
   WHERE  v1.Finterid=@FBomInterid  AND v2.Finterid = v1.FInterID
    AND v2.FItemID = t1.FItemID ORDER BY t1.fname
  END
 END
 SELECT @SelectRows = COUNT(*) FROM #MutiParentItem
 WHILE ( @BOMLevel < @BomMaxLevel AND @SelectRows >0 )
 BEGIN
  SET @SelectRows = 0
  SELECT TOP 1 @ParentIndex=u1.FIndex,@ParentItemID=u1.Fitemid,@ParentNeedQty=u1.FNeedQty,@ParentBomLevel=u1.FBOMLevel,
   @ParentHaveMrp=u1.FHaveMrp,@ParentLevelString=u1.FLevelString,@ParentHistory=u1.FHistory ,@FItemType=u1.FItemType ,@FBom=u1.FBom,@FMaterielType=u1.FMaterielType
  FROM #MutiParentItem u1 ORDER BY FIndex DESC   
  -----只展开普通件和特征件,如果不是，停止展开此物料
  IF @FMaterielType=372 OR @FMaterielType=373 OR @FMaterielType=374 OR @FMaterielType=376
   SELECT @ParentHaveMrp =1
  IF @ParentHaveMrp > 0
  BEGIN
   INSERT INTO #Mutidata (FEntryID,fbominterid,FItemID,FNeedQty,FBomLevel,FItemType,FParentID,FHistory,FLevelString ,FBom,FMaterielType,FOperID)
   SELECT U1.FEntryID,u1.fbominterid, u1.FItemID,u1.FNeedQty,u1.FBomLevel,u1.FItemType,u1.FParentID,u1.FHistory,u1.FLevelString ,u1.FBom,u1.FMaterielType,u1.FOperID
   FROM #MutiParentItem u1  WHERE u1.FIndex = @ParentIndex
   Delete FROM #MutiParentItem WHERE FIndex = @ParentIndex
  END
  ELSE
  BEGIN
       UPDATE #MutiParentItem SET FHaveMrp = 1 WHERE FIndex = @ParentIndex
       ----展开并插入该物料的父项物料-----------
       SET @SelectRows = 0
      ----增加计数器-------------------------
       SET @BomLevel = @ParentBomLevel + 1
       ---限定展开层次
       IF @BomLevel=@ExpandLevel
    SELECT @ParentHaveMrp =1
   IF @sHideDisabledMaterial = '1'
   BEGIN
          IF @order=0
          BEGIN
           INSERT INTO #MutiParentItem(FEntryID,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
           SELECT V2.FEntryID,v2.finterid,
            v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15)) * CAST(((CAST(v2.FQty AS Decimal(28,15))/ CAST(v1.FQty AS Decimal(28,15)))) AS Decimal(28,15)) FNeedQty, (@BomLevel) FBomLevel,
            @parentIndex FParentID,t1.FErpClsID FItemtype,
            v2.FQty / v1.FQty FRate,@ParentHistory ,@ParentHaveMrp,@FBom,v2.FMaterielType,v2.FOperID
           FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
           WHERE  v1.FitemiD=@ParentItemID AND v1.FUseStatus = 1072 AND v2.Finterid = v1.FInterID
            AND v2.FItemID = t1.FItemID AND v2.FBeginDay <= @EndDay AND v2.FEndDay >= @BeginDay ORDER BY v2.FEntryID
          END
          ELSE IF @order=1
    BEGIN
     IF @sLongNumber = '0'
      INSERT INTO #MutiParentItem(FEntryID,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
      SELECT V2.FEntryID,v2.finterid,
       v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15)) * CAST(((CAST(v2.FQty AS Decimal(28,15))/ CAST(v1.FQty AS Decimal(28,15)))) AS Decimal(28,15)) FNeedQty, (@BomLevel) FBomLevel,
       @parentIndex FParentID,t1.FErpClsID FItemtype,
       v2.FQty / v1.FQty FRate,@ParentHistory ,@ParentHaveMrp,@FBom,v2.FMaterielType,v2.FOperID
      FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
      WHERE  v1.FitemiD=@ParentItemID AND v1.FUseStatus = 1072 AND v2.Finterid = v1.FInterID
       AND v2.FItemID = t1.FItemID AND v2.FBeginDay <= @EndDay AND v2.FEndDay >= @BeginDay ORDER BY t1.fnumber
     ELSE
      INSERT INTO #MutiParentItem(FEntryID,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
      SELECT V2.FEntryID,v2.finterid,
       v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15)) * CAST(((CAST(v2.FQty AS Decimal(28,15))/CAST(v1.FQty AS Decimal(28,15)))) AS Decimal(28,15)) FNeedQty, (@BomLevel) FBomLevel,
       @parentIndex FParentID,t1.FErpClsID FItemtype,
       v2.FQty / v1.FQty FRate,@ParentHistory ,@ParentHaveMrp,@FBom,v2.FMaterielType,v2.FOperID
      FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
      WHERE  v1.FitemiD=@ParentItemID AND v1.FUseStatus = 1072 AND v2.Finterid = v1.FInterID
       AND v2.FItemID = t1.FItemID AND v2.FBeginDay <= @EndDay AND v2.FEndDay >= @BeginDay ORDER BY t1.fshortnumber
    END
    ELSE
    BEGIN
     INSERT INTO #MutiParentItem(FEntryID,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
     SELECT V2.FEntryID,v2.finterid,
      v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15)) * CAST(((CAST(v2.FQty AS Decimal(28,15)) /CAST(v1.FQty AS Decimal(28,15)))) AS Decimal(28,15)) FNeedQty, (@BomLevel) FBomLevel,
      @parentIndex FParentID,t1.FErpClsID FItemtype,
      v2.FQty / v1.FQty FRate,@ParentHistory ,@ParentHaveMrp,@FBom,v2.FMaterielType,v2.FOperID
     FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
     WHERE  v1.FitemiD=@ParentItemID AND v1.FUseStatus = 1072 AND v2.Finterid = v1.FInterID
      AND v2.FItemID = t1.FItemID AND v2.FBeginDay <= @EndDay AND v2.FEndDay >= @BeginDay ORDER BY t1.fname
    END
   END
   ELSE
   BEGIN
          IF @order=0
          BEGIN
           INSERT INTO #MutiParentItem(FEntryID,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
           SELECT V2.FEntryID,v2.finterid,
            v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15) ) * CAST(((CAST(v2.FQty AS Decimal(28,15))/ CAST(v1.FQty AS Decimal(28,15)))) AS Decimal(28,15)) FNeedQty, (@BomLevel) FBomLevel,
            @parentIndex FParentID,t1.FErpClsID FItemtype,
            v2.FQty / v1.FQty FRate,@ParentHistory ,@ParentHaveMrp,@FBom,v2.FMaterielType,v2.FOperID
           FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
           WHERE  v1.FitemiD=@ParentItemID AND v1.FUseStatus = 1072 AND v2.Finterid = v1.FInterID
            AND v2.FItemID = t1.FItemID  ORDER BY v2.FEntryID
          END
          ELSE IF @order=1
    BEGIN
     IF @sLongNumber = '0'
      INSERT INTO #MutiParentItem(FEntryID,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
      SELECT V2.FEntryID,v2.finterid,
       v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15)) * CAST(((CAST(v2.FQty AS Decimal(28,15))/ CAST(v1.FQty AS Decimal(28,15)))) AS Decimal(28,15)) FNeedQty, (@BomLevel) FBomLevel,
       @parentIndex FParentID,t1.FErpClsID FItemtype,
       v2.FQty / v1.FQty FRate,@ParentHistory ,@ParentHaveMrp,@FBom,v2.FMaterielType,v2.FOperID
      FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
      WHERE  v1.FitemiD=@ParentItemID AND v1.FUseStatus = 1072 AND v2.Finterid = v1.FInterID
       AND v2.FItemID = t1.FItemID ORDER BY t1.fnumber
     ELSE
      INSERT INTO #MutiParentItem(FEntryID,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
      SELECT V2.FEntryID,v2.finterid,
       v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15)) * CAST(((CAST(v2.FQty AS Decimal(28,15))/CAST(v1.FQty AS Decimal(28,15)))) AS Decimal(28,15)) FNeedQty, (@BomLevel) FBomLevel,
       @parentIndex FParentID,t1.FErpClsID FItemtype,
       v2.FQty / v1.FQty FRate,@ParentHistory ,@ParentHaveMrp,@FBom,v2.FMaterielType,v2.FOperID
      FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
      WHERE  v1.FitemiD=@ParentItemID AND v1.FUseStatus = 1072 AND v2.Finterid = v1.FInterID
       AND v2.FItemID = t1.FItemID ORDER BY t1.fshortnumber
    END
    ELSE
    BEGIN
     INSERT INTO #MutiParentItem(FEntryID,fbominterid,FItemID,FNeedQty,FBOMLevel,FParentID,FItemType,FRate,FHistory,FHaveMrp,FBom,FMaterielType,FOperID)
     SELECT V2.FEntryID,v2.finterid,
      v2.FItemID, CAST(@ParentNeedQty AS Decimal(28,15)) * CAST(((CAST(v2.FQty AS Decimal(28,15)) /CAST(v1.FQty AS Decimal(28,15)))) AS Decimal(28,15)) FNeedQty, (@BomLevel) FBomLevel,
      @parentIndex FParentID,t1.FErpClsID FItemtype,
      v2.FQty / v1.FQty FRate,@ParentHistory ,@ParentHaveMrp,@FBom,v2.FMaterielType,v2.FOperID
     FROM ICBOM v1,ICBOMChild v2,t_ICItem t1
     WHERE  v1.FitemiD=@ParentItemID AND v1.FUseStatus = 1072 AND v2.Finterid = v1.FInterID
      AND v2.FItemID = t1.FItemID ORDER BY t1.fname
    END
   END
  END
  SELECT @SelectRows = Count(*) FROM #MutiParentItem
 END
  ---错误判断------------------------
 --IF @BOMLevel >= 50
 --BEGIN
  --SET @Succeed=1
  --SET @Reason='BOM结构不安全，可能出现嵌套！BOM展开无法继续.'
 --END
 UPDATE #Mutidata SET FLevelString = REPLICATE('.', FBomLevel) + convert(varchar(4),FBomLevel)
 --select * from #Mutidata a,t_icitem b where a.fitemid=b.fitemid
  --下面这段语句是查询出来的数据，只查询前面几个字段，多数字段被我注销了（需要可自己修改）
 select a.FLevelString FLevel,b.fnumber FNumber,b.fname FName, k.FName as FErpClsName,
a.FNeedQty FQty
--b.FChartNumber AS FChartNumber,isnull(c.Fname,' ')+' ' FUnitID, 
--,d.FScrap,d.FMachinePos,isnull(e.Fname,' ')+' ' FMaterielType,(case d.FOperSN when 0 then '' else cast(d.FOperSN as varchar(255)) end) 
 --FOperSN,isnull(f.Fname,' ')+' ' FOperID, isnull(g.FName,' ')+' ' FStockID,(case b.FIsKeyItem when 0 then '否' else '是' end) FIsKeyItem, (case h.FDeleted when 0 then '否' else 
 --'是' end)  FDeleted,d.FNote,isnull(i.fname,' ')+' ' FUseStatus,a.FitemID EditFitem, CASE WHEN (d.FBeginDay BETWEEN '1900-01-01' AND  '2100-01-01') THEN 0  WHEN (d.FEndDay 
 --BETWEEN '1900-01-01' AND  '2100-01-01' ) THEN 0  WHEN ('1900-01-01' >= d.FBeginDay AND '2100-01-01' <= d.FEndDay) THEN 0 ELSE 1 END AS FAlterBackColor, '253, 223, 
 --223' AS FBackColor,  d.FBeginDay,d.FEndDay,d.FPercent,b.FQtyDecimal FInitDecimal,b.FQtyDecimal FQtyDecimal
 --select a.FLevelString+' ' FLevel,b.fnumber+b.FModel FNumber,b.fname+' ' FName, k.FName+' ' as FErpClsName,b.FChartNumber AS FChartNumber,isnull(c.Fname,' ')+' ' FUnitID
  into #TmpBOM from #Mutidata a
 inner join t_icitem b on a.fitemid=b.fitemid
 left outer join t_item c on b.funitid=c.fitemid
 inner join icbomchild d on a.FBomInterid=d.finterid and a.FItemID=d.FItemID and a.FOperID=d.FOperID AND a.FEntryID=d.FEntryID
 left outer join t_submessage e on d.FMaterielType=e.finterid
 left outer join t_submessage f on d.FOperID=f.finterid
 left outer join t_stock g on d.FStockID=g.FItemID
 inner join t_item h on b.fitemid=h.fitemid
 left outer join t_submessage i on b.fusestate=i.finterid
 inner join  t_submessage k on b.FErpClsID = k.FinterID
 where a.FBOMLevel>0 and ferpclsid=1 order by a.FIndex desc
-- ferpclsid=1代表采购件，可以去掉表示展开所有物料

 select * from #TmpBOM 
 drop table #TmpBOM

 drop table #Errors
 drop table #MutiParentItem
 drop table #Mutidata
 RETURN

 

sumeing
关注
  • 0
    点赞
  • 踩
  • 5
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
Hive中分组取前几名及行列转换的方法
Nieson2012的专栏
11-01 2898
row_number()、rank()和dense_rank()这三个是hive内置的分析函数，这三个函数可以用于分组取前几名，下面我们来看看他们的区别和具体的使用案例。 首先创建一个文件test： A,1 B,3 C,2 D,3 E,4 F,5 G,6 然后创建hive表： create table test_rank(a string,b int) row format delimite...
做事的常识，成功的公式
安晓辉生涯——聚焦程序员的职业规划与成长
08-15 7761
开始+坚持+重复=成功，这就是做事的常识，但如何养成相应的习惯呢
2023年加油！
小石头
01-08 112
2022年可谓是艰难的一年，疫情管控放开前，公司和小区随机来个封控，搞得人心惶惶。疫情放开后，病毒肆虐，周围的小伙伴都没能躲过病毒的攻击。然而阳康之后面临了更严重的挑战。从头条报爆出来的裁员大事件到身边周围的小外包减员，裁员风暴如秋风扫落叶袭来。俗话说冬天来了，春天还会远吗，但愿随着猛虎的离去，玉兔能给俾人以及各位小伙伴带来好运气。面对来势汹汹的裁员风暴，君子不立危墙之下，还是早做打算为上上策。对于在西安做互联网开发的小伙伴来说，如果没有更好的选择，通过华为OD考试，进入高级外包也是一个性价比较高的选择。
加油吧
u013025301的博客
09-20 202
周三下午我们一起做了游戏，一起玩的很嗨，也许又让我多了一份想念。 我们刚开始的时候时代着眼罩往活动中心走，我是个胆小的人，也是个极其没有安全感的人。走路的时候，我都是迈着小碎步，不敢迈大步，他们都说让我放心的走，可我就是不敢，我前面的老乡也一直在鼓励我，告诉我没事他牵着我呢，可是总是会有害怕，不是因为不相信他儿时克服不了心底的那份恐惧。人总是这样，逃避不了自己害怕的东西，有脆弱的时候，后来走了好
空中加油个股疯狂主升浪
趋势创造者-一直在努力，拥抱大海，拥抱浩瀚的天空，探知未来的世界 祗偽妳動訫 Happiness keeps you Sweet
12-03 133
  周三大盘一路震震荡荡再次逼近前期高点，虽然几次做出跳水状，但是，场外资金入市踊跃，两市涨停个股超过40家，其中国庆后新多主力介入的品种继续高举高 打，上海成交量继续维持在2000亿以上。全天涨幅靠前的个股以黄金、资源、地产等个股为最，这些个股的走强，与大宗交易市场价格稳步攀升有关。   从具体盘面看，由于美圆指数的不断贬值，刺激了有色金属，特别是黄金股的走强，而泛消费概念个股中...
为自己加油
weixin_33974433的博客
12-26 59
这个周末是过去的四个月中第一次不用上课，加之目前只剩下一门课程没有考完，心情很是放松。过去的两年也是我参加工作以来最为忙碌的时期。去年为了备考MBA加之工作很紧（当时正在做一个比较大的feature），所以忙得一塌糊涂；今年因为MBA学习加上新项目的开始，更是忙得不可开交。在整个忙碌的过程中还真是辛苦。周一到周三的晚上要上课，而且是上到晚上十点。另外周六整个白天也要上...
周三作祝福语精选.doc
10-11
5. **自我激励**：祝福语中的“周三加油”、“快乐欢乐向幸福出发”等词语，都是在鼓励人们自我激励，积极面对每一天。 6. **创新思维**：“压力越大越精神，创新思路如泉涌”，表明压力有时可以激发人的创造力，...
管理学周三都组织的部门化与层级化.pptx
02-23
管理学周三都组织的部门化与层级化.pptx
管理学周三都组织的部门化与层级化学习教案.pptx
11-14
《管理学：组织的部门化与层级化》 组织，作为一种人们为了共同目标协作的工具，是社会活动中不可或缺的一部分。组织工作，不仅涉及到明确活动、分类活动，还涵盖了将这些活动分组并分配给拥有相应权力的管理者进行...
如和写一个库，并发布，我的colorfontcolor产生使用
qq_73917015的博客
08-22 959
如和写一个库，并发布，我的colorfontcolor产生使用
Vue3学习——Node环境安装（一）
gao7009的博客
08-22 1028
在进行 Vue 项目开发时，必须先安装Node.js。Node.js 是一个基于 Chrome V8 引擎的 JavaScript 运行环境。在 Vue 项目中，我们通常会使用到 Node.js 的 npm（Node Package Manager）来管理项目所需的各种库和工具，例如 Vite、Babel、ESLint 等。此外，Node.js 还可以用来运行开发环境中的本地服务器，以及编译、打包项目等。因此，安装 Node.js 是进行 Vue 项目开发的基础步骤。
npm install` 报错
m0_70066267的博客
08-23 702
处理报错是一个常见且可能涉及多个层面的挑战，因为错误的根源可以非常多样化，包括但不限于网络问题、权限问题、依赖冲突、npm配置错误、Node.js版本不兼容等。下面我将详细讨论几种常见的报错情况及其解决方案，力求覆盖到至少2000字的详细分析。
arcgis API for javascript 4.x GeoJSONLayer 加载方法
everlasting的博客
08-23 318
arcgis API for javascript 4.x GeoJSONLayer
Hiprint 打印插件在 Vue3 中的深度剖析
最新发布
qq_22232065的博客
08-26 560
Hiprint 打印插件在 Vue3 项目中具有重要的地位和显著的优势。首先，它为 Vue3 项目提供了强大且便捷的打印功能。在现代的 Web 应用开发中，打印需求常常存在，而 Hiprint 很好地满足了这一需求，让开发者能够轻松实现打印相关的操作。其优势之一在于简单易用。对于开发者而言，无需深入复杂的打印技术细节，通过简单的配置和调用，就能快速集成打印功能到 Vue3 项目中，大大提高了开发效率。此外，Hiprint 具有高度的灵活性。
ArcGIS Pro基础：设置2个窗口同步联动界面
yuanYW7556的博客
08-22 429
如上所示，通过1步骤，新建了2个地图窗口，得到2和3所表示的【地图1】、【地图2】，一个是影像图，另一个是地形图，如上所示，通过拖动缩放鼠标，就可以实现同步的观察不同位置的变化情况。如上所示，只需要在【地图1】上右键，弹出【新建垂直选项卡组】即可。如上所示，不习惯左右联动的，可以设置上下同步联动。如上所示，2个窗口就会被平分为左右 2个部分。紧接着，在【链接视图】里选中【中心和比例】为了直观指示位置，也可以勾选【链接游标】
vTable实现多维表格
badbaby52906的博客
08-25 506
介绍如何用vTable构建简单的多维表格
【Bigtop】利用Bigtop3.2.0编译大数据组件RPM包
Meepoljd的博客
08-26 493
Bigtop 从0开始参考了上述的博文自己尝试了编译组件，过程还是遇到很多问题，一一记录，方便后人
npm install报错，解决记录
hai40587的博客
08-23 481
处理报错是一个常见且可能涉及多个层面的挑战，因为错误的根源可以非常多样化，包括但不限于网络问题、权限问题、依赖冲突、npm配置错误、Node.js版本不兼容等。下面我将详细讨论几种常见的报错情况及其解决方案，力求覆盖到至少2000字的详细分析。
每两周的周三执行一次corn表达式
07-27
根据引用\[1\]中的说明，我们可以使用以下的cron表达式来实现每两周的周三执行一次任务： 0 0 * * 3 \[1\] 这个表达式的含义是：在每个星期三的午夜12点执行任务。星号（*）表示任意值，所以星号（*）在分钟和小时的位置上表示任意时间。数字0表示每个月的任意日期。数字3表示星期三。因此，这个表达式可以实现每两周的周三执行一次任务。 #### 引用[.reference_title] - *1* *2* *3* [Linux之crontab命令](https://blog.csdn.net/carefree2005/article/details/113832793)[target="_blank" data-report-click={"spm":"1018.2226.3001.9630","extra":{"utm_source":"vip_chatgpt_common_search_pc_result","utm_medium":"distribute.pc_search_result.none-task-cask-2~all~insert_cask~default-1-null.142^v91^insertT0,239^v3^insert_chatgpt"}} ] [.reference_item] [ .reference_list ]
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值