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 );
| }
| *]
| }
|
|