需求和外部库存日期限制过滤取消 创建采购供应

renhao

2023-09-19 378955a39437125d274173c1ebcfd91dba15fc18

 _Main/BL/Type_MacroPlan/Method_MappingOperationBOMDataSupplyPurchase.qbl

@@ -8,14 +8,7 @@
{
  TextBody:
  [*
    routingId := "PR_"+orgCode + "_" + productId;
    unitId := "供应商";
    routingStepName := "Purchase";
    operationId := orgCode + "_PR_" + productId;
    routing := Routing::CreateOrUpdate( this, routingId );
    toDeleteSteps := selectset( routing, RoutingStep, routingStep, true );
    RoutingStep::Delete( toDeleteSteps );
    routingStep := RoutingStep::Create( routing, routingStepName, "", true );
    
    product := Product_MP::FindById( this, productId );
    if( isnull( product ) ) {
        info(  "product : " + productId + " not found" );
@@ -27,6 +20,14 @@
    }
    
    if( not isnull( product) and not isnull( stockingPoint)){
      routingId := "PR_"+orgCode + "_" + productId;
      unitId := "供应商";
      routingStepName := "Purchase";
      operationId := orgCode + "_PR_" + productId;
      routing := Routing::CreateOrUpdate( this, routingId );
      toDeleteSteps := selectset( routing, RoutingStep, routingStep, true );
      RoutingStep::Delete( toDeleteSteps );
      routingStep := RoutingStep::Create( routing, routingStepName, "", true );
      unit := Unit::FindById( this, unitId );
      if( isnull( unit ) ) {
        unit := this.Unit( relnew,