下线计划优化

陈清红

2024-12-03 3e98477644a8c248d827dbc6eedb3a41c8cbcfea

下线计划优化

 _Main/BL/Type_NewOfflinePlanCell/StaticMethod_DeductionOfReplacementLoss.qbl

@@ -14,7 +14,7 @@
    allProductionLines := selectuniquevalues( newNOPT, NewOfflinePlanRow, tempNOPR, true, tempNOPR.ProductionLine() );
    
    traverse ( allProductionLines, Elements, pl
    //           , pl = "CC MoMo" 
    //           , pl = "CC ZKG" 
             ) 
    {
      // 下线计划当前产线下的行
@@ -24,7 +24,7 @@
      preNOPCell := null( NewOfflinePlanCell );
      
      traverse ( newNOPT, NewOfflinePlanColumn, nopc
    //             , nopc.StartDate() >= macroPlan.StartOfPlanning().Date() and nopc.StartDate() <= Date::Construct( 2025, 1, 16 ) // 测试时可以过滤时间
    //             , nopc.StartDate() >= macroPlan.StartOfPlanning().Date() and nopc.StartDate() <= Date::Construct( 2025, 1, 7 ) // 测试时可以过滤时间
               ) 
      {         
        for ( i := 1; i < 10; i++ ) {
@@ -32,6 +32,7 @@
          
          // 换型损失参数
          cls     := select( macroPlan, ChangeLossSetting, tempCLS, 
                             tempCLS.Unit().ID()          = pl                                                      and 
                             tempCLS.ProductFirst().ID()  = guard( preNOPCell.NewOfflinePlanRow().ProductID(), "" ) and
                             tempCLS.ProductSecond().ID() = guard( nopcell.NewOfflinePlanRow().ProductID(), "" )    and
                             tempCLS.StartDate()          <= nopc.StartDate()                                       and