合并DEV并且更新了冲减到订单

yunchai

2023-09-25 85fb8fdf8bdef29cbe8a1f64bc27e049454e7142

 _Main/BL/Type_CustomerOrder/StaticMethod_CreateOrUpdate.qbl

@@ -27,7 +27,7 @@
    product := Product_MP::FindById( macroPlan, productId );
    salesSegment := SalesSegment_MP::FindByName( macroPlan, salesSegmentName );
    stockingPoint := StockingPoint_MP::FindById(  macroPlan, stockingPointId );
    currency := Currency_MP::FindById( macroPlan, currencyId );
    //currency := Currency_MP::FindById( macroPlan, currencyId );
    unitOfMeasure := null( UnitOfMeasure_MP )
    priority := null( Priority );
    if( unitOfMeasureName <> "" ) {
@@ -38,33 +38,58 @@
    }
    // 检查依赖项
    if( isnull( product) ) {
        error( "product not found" );  
        info( "product not found" );  
    }
    if( isnull( salesSegment) ) {
        error( "sales segment not found" );  
        info( "sales segment not found" );  
    }
    if( isnull( stockingPoint) ) {
        error( "stock point not found" );  
        info( "stock point not found" );  
    }
    if( isnull( currency) ) {
        error( "currency not found" );  
    }
    //if( isnull( currency) ) {
    //    error( "currency not found" );  
    //}
    if( unitOfMeasureName <> "" and isnull( unitOfMeasure) ) {
        error( "unit of measure not found" );  
        info( "unit of measure not found" );  
    }
    if( priorityName <> "" and isnull( stockingPoint) ) {
        error( "priority not found" );  
        info( "priority not found" );  
    }
    // 新增/更新
    result := CustomerOrder::FindById( macroPlan, id );
    if( isnull( result ) ) {
        CustomerOrder::Create( product, stockingPoint, id, orderDate, quantity, price, 
                               priorityName, salesSegmentName, currency.Name(), unitOfMeasureName, 
                               priorityName, salesSegmentName, currencyId, unitOfMeasureName, 
                               false, customerName, customerId, orderId, orderLineId, true, true, true );
    } else {
        result.Update( product, stockingPoint, orderDate, quantity, price, 
                       priorityName, salesSegmentName, currency.Name(), unitOfMeasureName, 
                       false, customerName, customerId, orderId, orderLineId, true, true, true );
        if( result.ProductID() = productId 
            and result.StockingPointID() = stockingPointId 
            and result.StartDate() = orderDate 
            and result.Quantity() = quantity 
            and result.Price() = price 
            and result.PriorityName() = priorityName 
            and result.SalesSegmentName() = salesSegmentName 
            and result.CurrencyID() = currencyId 
            and result.UnitOfMeasureName() = unitOfMeasureName 
            and result.CustomerName() = customerName 
            and result.CustomerID() = customerId 
            and result.OrderID() = orderId 
            and result.OrderLineID() = orderLineId ){
              info( "No need to update this order: " + id );
              }else{
                if( result.IsLocked() = true ){
                  pispips := selectset( result, ProductInStockingPoint_MP.ProductInStockingPointInPeriod, pispip, true );
                  pispipLeafs := selectset( pispips, 
                                            Elements.astype( ProductInStockingPointInPeriodPlanningLeaf ), 
                                            pispip, 
                                            true );
                  ProductInStockingPointInPeriod::LockUnlockPlanning( pispipLeafs, false, true );
                }
                result.Update( product, stockingPoint, orderDate, quantity, price, 
                               priorityName, salesSegmentName, currencyId, unitOfMeasureName, 
                               false, customerName, customerId, orderId, orderLineId, true, true, true );
                result.IsLocked( false );
                }
    }
    return result;
  *]