财务产量报表机加件数据去除

lazhen

2024-12-20 93feb2bee2d8bf488e1bd76abf867c70f4e841eb

财务产量报表机加件数据去除

 _Main/BL/Type_CustomerDemandPPAIDS/Attribute_StockingPoint.qbl

¶Ô±ÈÐÂÎļþ
@@ -0,0 +1,7 @@
Quintiq file version 2.0
#parent: #root
Attribute StockingPoint
{
  #keys: '3[415136.0.1367364685][415136.0.1367364684][415136.0.1367364686]'
  ValueType: String
}

 _Main/BL/Type_CustomerDemandPPAIDS/StaticMethod_GenerateDataNew.qbl

@@ -34,6 +34,7 @@
                                                                     , DemandQty               := [Number]archivedata.Quantity()
                                                                     , VersionName             := macroplan.ScenarioName()
                                                                     , InterfaceTime           := nowdate
                                                                     , StockingPoint           := archivedata.StockingPointID() 
                                                                     , FactoryName             := archivedata.FactoryName()
                                                                     , Fac                     := ifexpr( archivedata.FactoryName() = FinancialProductionReport::GetDefaultCCUnit(), 'CC', 'DL' )  
    //                                                                 , VersionFlag             := versionflag

 _Main/BL/Type_CustomerDemandPPAIDS/StaticMethod_Publish.qbl

@@ -13,6 +13,7 @@
      idsjson          := JSON::Object().Add( "product", ids.Product() ).Add( "demandDate", ids.DemandDate().Format( 'Y-M2-D2' ) )//"2024-10-01" )
                                    .Add( "demandQty", ids.DemandQty() )
                                    .Add( "versionName", ids.VersionName() )
                                    .Add( "stockingPoint", ids.StockingPoint() )
                                    .Add( "interfaceTime", ids.InterfaceTime().Format( 'Y-M2-D2 H:m:s' ) ).Build();/*"2024-10-01 12:00:00" )*/
      jsonarray.Add( idsjson );
    }

 _Main/BL/Type_FinancialProductionSource/StaticMethod_Initialize.qbl

@@ -24,7 +24,7 @@
    //取当前版本的product planning里new supply字段，分大连和长春工厂的产线，进行加总
    traverse( owner, StockingPoint_MP, stockingpoint, stockingpoint.ID().EndsWith( '厂内库' ) or stockingpoint.ID() = '大连外租库' ){
      iscc                    := stockingpoint.ID().StartsWith( 'CC' ) or stockingpoint.ID().StartsWith( '长春' );
      isdl                    := stockingpoint.ID().StartsWith( 'DL' ) or stockingpoint.ID().StartsWith( '大连' );
      isdl                    := stockingpoint.ID().StartsWith( '大连' );
      
      if( iscc or isdl ){
        traverse( stockingpoint, ProductInStockingPoint_MP, pisp,  pisp.Product_MP().IsLeaf()