下发订单优化

hongjli

2023-09-19 501c430f63765573c4f6765078e8bdba5718ce48

下发订单优化

 _Main/BL/Type_MasterPlanReleaseWorkOrder/StaticMethod_GenerateAndDistributeWorkOrders.qbl

@@ -10,9 +10,12 @@
    
    newMasterPlanReleaseWorkOrder := macroPlan.MasterPlanReleaseWorkOrder( relnew, IsGenerateAndPublishWorkOrders := true );
    
    universalPrefixForWorkOrderNumber := [String]Date::ActualDate().Year() + ( [String]Date::ActualDate().Month() ) +
                                         [String]Date::ActualDate().Day() + [String]DateTime::ActualTime().HourOfDay() + 
                                         [String]DateTime::ActualTime().MinuteOfHour();
    universalPrefixForWorkOrderNumber := [String]Date::ActualDate().Year() + 
                                         ifexpr( ( [String]Date::ActualDate().Month() ).Length() = 1, "0" + [String]Date::ActualDate().Month(), [String]Date::ActualDate().Month() )                         +
                                         ifexpr( ( [String]Date::ActualDate().Day() ).Length() = 1, "0" + [String]Date::ActualDate().Day(), [String]Date::ActualDate().Day() )                               +
                                         ifexpr( ( [String]DateTime::ActualTime().HourOfDay() ).Length() = 1, "0" + [String]DateTime::ActualTime().HourOfDay(), [String]DateTime::ActualTime().HourOfDay() ) +
                                         ifexpr( ( [String]DateTime::ActualTime().MinuteOfHour() ).Length() = 1, "0" + [String]DateTime::ActualTime().MinuteOfHour(), [String]DateTime::ActualTime().MinuteOfHour() );
    
    orderNumber := 1;
    
    traverse ( macroPlan, Product_MP.ProductInStockingPoint_MP, pisp, pisp.IsLeaf() and not pisp.IsSystem() ) {