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 Convert 
 |  { 
 |    TextBody: 
 |    [* 
 |      lane := Lane::FindLaneTypeIndex( this.ID() ); 
 |      account := Account_MP::FindAccountTypeIndex( 'Process preference cost' ); 
 |       
 |      if( not isnull( lane ) and not isnull( account ) ) 
 |      { 
 |        LaneCost::Create( OS::GenerateGUIDAsString(), 
 |                          lane, 
 |                          account, 
 |                          'Volume', 
 |                          this.MacroPlan().Start().Date(), 
 |                          '', 
 |                          1, 
 |                          this.PreferenceBonus(), 
 |                          false ); 
 |      } 
 |    *] 
 |  } 
 |  
  |