admin
2024-09-24 8dcecb62309701060564490cdee291849b9bfe90
优化
已修改3个文件
已添加1个文件
31 ■■■■■ 文件已修改
_Main/BL/Type_TransferPlanCell/StaticMethod_GenerateReport.qbl 12 ●●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/Type_TransferPlanRow/Method_Filter.qbl 13 ●●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/UI/MacroPlannerWebApp/Component_ApplicationMacroPlanner/Component_abgSecondDevelopmentPlan.def 4 ●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/UI/MacroPlannerWebApp/Component_FormTransferPlan/Component_MatrixEditor872.def 2 ●●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/Type_TransferPlanCell/StaticMethod_GenerateReport.qbl
@@ -14,7 +14,7 @@
    // ç”Ÿæˆè°ƒæ‹¨è®¡åˆ’
    traverse ( macroPlan, Unit, u, u.HasCapacityTypeTransportQuantity() ) {
      traverse ( u, Lane.LaneLeg.Trip, t ) {
        traverse ( t, ProductInTrip, pit, pit.Quantity() > 0.0 ) {
        traverse ( t, ProductInTrip, pit, pit.Quantity() > 0.0 and exists( pit.Product_MP(), AllParent.AsParent, tempP, tempP.ID() = "机加件" ) ) {
          // æ‰¾è¡Œ
          tpr := TransferPlanRow::FindTransferPlanRowTypeIndex( TransferPlanRow::IdentifyTheFactory( t.LaneLeg().AsOriginStockingPointLeg().StockingPoint_MP() ),
                                                                TransferPlanRow::IdentifyTheFactory( t.LaneLeg().AsDestinationStockingPointLeg().StockingPoint_MP() ),
@@ -57,6 +57,16 @@
      indexDate := indexDate + 1;
    }
    
    // è¡¥é½ç©ºæ ¼å­
    traverse ( macroPlan, TransferPlanRow, tpr ) {
      traverse ( macroPlan, TransferPlanColumn, tpc, tpc.ColumnDate() >= minselect( macroPlan, TransferPlanColumn, tempTPC, true, tempTPC.ColumnDate() ).ColumnDate() ) {
        cell := select( tpr, TransferPlanCell, tempTPC, tempTPC.TransferPlanColumn() = tpc );
        if ( isnull( cell ) ) {
          cell := tpc.TransferPlanCell( relnew, Value := "" );
          cell.TransferPlanRow( relset, tpr );
        }
      }
    }
    
    // ç”Ÿæˆäº§å“åˆ—
    minDateTPC := macroPlan.TransferPlanColumn( relnew,
_Main/BL/Type_TransferPlanRow/Method_Filter.qbl
¶Ô±ÈÐÂÎļþ
@@ -0,0 +1,13 @@
Quintiq file version 2.0
#parent: #root
Method Filter (
  Product_MPs products
) declarative remote as Boolean
{
  TextBody:
  [*
    flag := exists( products, Elements, tempP, tempP.ID() = this.ProductID() );
    return flag;
  *]
}
_Main/UI/MacroPlannerWebApp/Component_ApplicationMacroPlanner/Component_abgSecondDevelopmentPlan.def
@@ -32,7 +32,7 @@
      Properties:
      [
        Image: 'LIGHTBULB'
        Label: 'Offline plan'
        Label: 'Output plan'
        Taborder: 1
      ]
    }
@@ -44,7 +44,7 @@
      [
        Description: 'AssemblyOnlinePlan'
        Image: 'PALM_TREE'
        Label: 'Assembly online plan'
        Label: 'Filing plan'
        Taborder: 2
      ]
    }
_Main/UI/MacroPlannerWebApp/Component_FormTransferPlan/Component_MatrixEditor872.def
@@ -45,6 +45,8 @@
          Properties:
          [
            DataType: 'MacroPlan'
            FilterArguments: 'products:QLibMacroPlannerWebUI::ApplicationMacroPlanner.DataHolderCheckedProduct'
            FixedFilter: 'object.Filter( products )'
            Source: 'MacroPlan'
            Taborder: 0
            Transformation: 'TransferPlanRow'