1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
| Quintiq file version 2.0
| #parent: #root
| MethodOverride ConvertToAccountCost
| {
| TextBody:
| [*
| sp := StockingPoint_MP::FindStockingPointTypeIndex( this.StockingPointID() );
| acc := Account_MP::FindAccountTypeIndex( this.AccountName() );
|
| if( not isnull( sp )
| and not isnull( acc )
| and not exists( sp, StockingPointCost, uc,
| uc.AccountName() = acc.Name()
| and uc.CostDriver() = this.CostDriver()
| and uc.Start() = this.Start() ) )
| {
| StockingPointCost::Create( OS::GenerateGUIDAsString(),
| sp, acc, this.CostDriver(), this.Start(),
| this.TimeUnit(), this.LengthOfTime(), this.Cost(),
| false );
| }
| *]
| }
|
|
