添加实际生产计划数据修改功能

xiaoding721

2024-11-29 39d207344803fffdce4b65eba90f56ea997c1d2c

 _Main/BL/Type_DispatchShiftSchedulingInformation/StaticMethod_GenerateDispatchData.qbl

@@ -165,14 +165,25 @@
        singleShiftVolume2 := 0.0;
        singleShiftVolume3 := 0.0;
        
        if( line.Tips().LikeUserLocale( "保养" )){
          singleShiftVolume1 := 0.0;
          singleShiftVolume2 := lineQuantity / 2;
          singleShiftVolume3 := lineQuantity / 2;
        }else{
          singleShiftVolume1 := lineQuantity / 3;
          singleShiftVolume2 := lineQuantity / 3;
          singleShiftVolume3 := lineQuantity / 3;
        singleShiftConfigs := selectset( unit,SingleShiftConfig,config,config.ShiftName() = "3" );
        traverse( singleShiftConfigs,Elements,singleShiftConfig ){
          if( line.Tips().LikeUserLocale( "保养" )){
            if( singleShiftConfig.SingleShiftName() = "白班"){
              singleShiftVolume1 := 0.0;
            }else if( singleShiftConfig.SingleShiftName() = "二班"){
              singleShiftVolume2 := singleShiftConfig.StandardYield();
            }else if( singleShiftConfig.SingleShiftName() = "三班"){
              singleShiftVolume3 := singleShiftConfig.StandardYield();
            }
          }else{
            if( singleShiftConfig.SingleShiftName() = "白班"){
              singleShiftVolume1 := singleShiftConfig.StandardYield();
            }else if( singleShiftConfig.SingleShiftName() = "二班"){
              singleShiftVolume2 := singleShiftConfig.StandardYield();
            }else if( singleShiftConfig.SingleShiftName() = "三班"){
              singleShiftVolume3 := singleShiftConfig.StandardYield();
            }
          }
        }
        
        for( i := tempProducts.Size() - 1;i >= 0; i-- ){
@@ -207,12 +218,22 @@
        // 240.5
        singleShiftVolume1 := 0.0;
        singleShiftVolume2 := 0.0;
        if( line.Tips().LikeUserLocale( "保养" )){
          singleShiftVolume1 := 0.0;
          singleShiftVolume2 := lineQuantity;
        }else{
          singleShiftVolume1 := lineQuantity / 2;
          singleShiftVolume2 := lineQuantity / 2;
        
        singleShiftConfigs := selectset( unit,SingleShiftConfig,config,config.ShiftName() = line.ShiftName() );
        traverse( singleShiftConfigs,Elements,singleShiftConfig ){
          if( line.Tips().LikeUserLocale( "保养" )){
            if( singleShiftConfig.SingleShiftName() = "白班"){
              singleShiftVolume1 := 0.0;
            }else if( singleShiftConfig.SingleShiftName() = "二班"){
              singleShiftVolume2 := singleShiftConfig.StandardYield();
            }
          }else{
            if( singleShiftConfig.SingleShiftName() = "白班"){
              singleShiftVolume1 := singleShiftConfig.StandardYield();
            }else if( singleShiftConfig.SingleShiftName() = "二班"){
              singleShiftVolume2 := singleShiftConfig.StandardYield();
            }
          }
        }
    
        for( i := tempProducts.Size() - 1;i >= 0; i-- ){