1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
| Quintiq file version 2.0
| #parent: #root
| Method GetBaseCurrency (
| DateTime start,
| Real current
| ) as Real
| {
| Description: 'Convert currency to base currency'
| TextBody:
| [*
| value:= current;
|
| if ( not this.IsBase() )
| {
| value := guard( maxselect( this, CurrencyInPeriod, cip, start >= cip.Period_MP().Start() ).Rate() * current, current );
| }
|
| return value;
| *]
| }
|
|
