Merge branch 'dev'

renhao

2023-10-18 ff1d40a1a235da7c3bdfa26070af267f19c7a3d3

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Quintiq file version 2.0
#parent: #root
Method AssignToStockingPoint (
  StockingPoint_MP stockingpoint
)
{
  Description: 'Swap the existing SP of PISP with the new SP.'
  TextBody:
  [*
    // DWE2 Apr-3-2016 (created)
    
    pisp := ProductInStockingPoint_MP::FindProductInStockingPointTypeIndex( this.ProductID(), stockingpoint.ID() );
    
    if( isnull( pisp ) )
    {
      product := Product_MP::FindProductTypeIndex( this.ProductID() );
      pisp := product.AddToStockingPoint( stockingpoint );
    }
    
    this.Operation().Unit().LinkToStockingPoint( stockingpoint, this.IsInput() );
    
    this.UpdateProductInStockingPoint( this.ProductID(), stockingpoint.ID() );
  *]
}