xiaoding721
2024-11-11 4f94ad9cd6bd7355017c88cdc8bdb67498d5410c
修复一些班次计划下发的bug
已修改3个文件
已添加1个文件
50 ■■■■■ 文件已修改
_Main/BL/Type_DispatchShiftPlan/StaticMethod_Dispatch.qbl 10 ●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/Type_DispatchShiftSchedulingInformation/StaticMethod_GenerateDispatchData.qbl 8 ●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/Type_LocalTool/StaticMethod_GetFactoryByUnit.qbl 26 ●●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/Type_Test/StaticMethod_Test.qbl 6 ●●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/Type_DispatchShiftPlan/StaticMethod_Dispatch.qbl
@@ -38,14 +38,8 @@
    now := DateTime::Now();
    macroPlanName := macroPlan.MDSMacroPlan().Description();
    traverse( macroPlan,Unit.UnitPeriod.astype( UnitPeriodTime ).ShiftPlan,shiftPlan ,shiftPlan.UnitPeriodTime().Period_MP().StartDate() >= macroPlan.StartOfPlanning().Date()){
       factory := shiftPlan.UnitPeriodTime().Unit();
       while( factory.HasParent() ){
         temp1 := factory;
         factory := factory.Parent();
         if( not factory.HasParent() ){
           factory := temp1;
         }
       }
       factory := LocalTool::GetFactoryByUnit( shiftPlan.UnitPeriodTime().Unit() );
       productLine :=  shiftPlan.UnitPeriodTime().Unit().ID();
       shiftDate := shiftPlan.UnitPeriodTime().Period_MP().StartDate();
       factoryName := factory.ID();
_Main/BL/Type_DispatchShiftSchedulingInformation/StaticMethod_GenerateDispatchData.qbl
@@ -46,13 +46,7 @@
        unitIndex := guard( unitIndexTree.Root().Child( unitHandle ), null( NamedValue ));
        if( not isnull( unitIndex )){
          unit := units.Element( unitIndex.GetValueAsNumber() );
          temp1 := unit;
          temp2 := unit.Parent();
          while( not isnull( temp1.Parent())){
            temp2 := temp1;
            temp1 := temp1.Parent();
          }
          factory := temp2;
          factory := LocalTool::GetFactoryByUnit( unit );
        }
      }
      
_Main/BL/Type_LocalTool/StaticMethod_GetFactoryByUnit.qbl
对比新文件
@@ -0,0 +1,26 @@
Quintiq file version 2.0
#parent: #root
StaticMethod GetFactoryByUnit (
  const Unit unit
) const as const Unit
{
  TextBody:
  [*
    // Akari Nov-11-2024 (created)
    factory := constnull( Unit );
    if( isnull( unit ) or isnull( unit.Parent())){
      factory := unit;
    }else{
      temp1 := unit;
      temp2 := unit.Parent();
      while( not isnull( temp1.Parent())){
        temp2 := temp1;
        temp1 := temp1.Parent();
      }
      factory := temp2;
    }
    return factory;
  *]
}
_Main/BL/Type_Test/StaticMethod_Test.qbl
@@ -11,10 +11,8 @@
{
  TextBody:
  [*
    traverse( archive,ArchiveFile,object ){
    //  object.Name();
    //  object.FilePath();
    //  object.SourceFileBinaryValue();
    traverse( macroPlan,Unit,unit ){
      info( LocalTool::GetFactoryByUnit( unit ).ID() );
    }
  *]
}