renhao
2023-09-21 43fede79199439f21ded86b04b719203933fbd57
stockingpoint调整
已修改3个文件
22 ■■■■■ 文件已修改
_Main/BL/Type_MacroPlan/StaticMethod_DoSync0.qbl 15 ●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/Type_StockingPoint_MP/StaticMethod_CreateStockingpoint.qbl 2 ●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/Type_StockingPoint_MP/StaticMethod_CreateStockingpointFromJson.qbl 5 ●●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/Type_MacroPlan/StaticMethod_DoSync0.qbl
@@ -32,8 +32,15 @@
    // 销售部门-2
    SalesSegment_MP::DoSync( macroPlan, businessTypes );
    
    // Unit-9 调整
    // 与Operation一同处理
    info( "Sales Segment Finished Finished, Start Operation Data Broker" );
    macroPlan.Broker_OTD_Operation().Execute();
    info( "Operation Data Broker Finished, Start Unit Mapping" );
    macroPlan.MappingUnitData( businessTypes );
    // 库存点-3
    info( "Sales Segment Finished, Start Get StockingPoint From Api" )
    info( "unit Finished, Start Get StockingPoint From Api" )
    bodynumber := "2";
    postrequestbody := macroPlan.ApiBuildPostRequestBody( bodynumber );
    address := "api-uat-sgc.tianma.cn";
@@ -72,12 +79,6 @@
    //单位转换-7
    BaseConversionFactor::DoSync( macroPlan );
    
    // Unit-9
    // 与Operation一同处理
    info( "BaseConversionFactor Finished, Start Operation Data Broker" );
    macroPlan.Broker_OTD_Operation().Execute();
    info( "Operation Data Broker Finished, Start Unit Mapping" );
    macroPlan.MappingUnitData( businessTypes );
    
    // 工艺路线 + BOM-9
    info( "Unit Finished, Start Operation Mapping" );
_Main/BL/Type_StockingPoint_MP/StaticMethod_CreateStockingpoint.qbl
@@ -33,7 +33,7 @@
      // Update
      result.Update( unitid, id, name, unitofmeasurename, currencyname, isplannedinfinite, datestart, dateend, groupname, description, isfromdb );
    };
    result.IsPlannedInfinite(true);
    return result;
  *]
}
_Main/BL/Type_StockingPoint_MP/StaticMethod_CreateStockingpointFromJson.qbl
@@ -13,6 +13,11 @@
    unitid := datarow.Get( "unitid" ).GetString();
    name := datarow.Get( "name" ).GetString();
    
    unit := Unit::FindUnitTypeIndex( unitid);
    if( isnull( unit)){
      unitid := "生产";
    }
    result := StockingPoint_MP::CreateStockingpoint( mp, id, unitid, name );
    
    return result;