1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
| Quintiq file version 2.0
| #parent: #root
| MethodOverride GetTimeAccountValueInPeriod (
| Period_MP period
| ) declarative remote as Real
| {
| TextBody:
| [*
| value := 0.0;
|
| if( period.UnitPeriod( relsize ) * this.Unit().UnitAccount( relsize ) < this.UnitAccountInPeriodForTime( relsize ) )
| {
| value := sum( period, UnitPeriod.UnitAccountInPeriodForTime, uaip,
| guard( uaip.UnitAccount() = this, false ),
| uaip.TotalBaseCost() );
| }
| else
| {
| value := sum( this, UnitAccountInPeriodForTime, uaipv,
| uaipv.UnitPeriod().Period_MP() = period ,
| uaipv.TotalBaseCost() );
| }
| return value;
| *]
| }
|
|