1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method CreatePISPAccount 
 |  { 
 |    Description: 'Create PISP account for this inentory value and cost.' 
 |    TextBody: 
 |    [* 
 |      // Based on the account, unit, and cost driver, find or create a PISP account. 
 |      stockingpoint := StockingPoint_MP::FindStockingPointTypeIndex( this.StockingPointID() ); 
 |       
 |      account := select( this.MacroPlan(), Account_MP, acc, acc.Name() = this.AccountName() ); 
 |       
 |      if( not isnull( account ) ) 
 |      { 
 |        PISPAccount::Assign( account, this.Product_MP(), stockingpoint, this.CostDriver() ); 
 |      } 
 |                              
 |       
 |      this.UpdateForeignKey( this.ProductID(), 
 |                             this.StockingPointID() ); 
 |    *] 
 |  } 
 |  
  |