1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
| Quintiq file version 2.0
| #parent: #root
| Method VerifyBaseCurrency (
| MacroPlan macroplan,
| String currencyName
| )
| {
| Description: 'Verify that the currency passed in is the base currency.'
| TextBody:
| [*
| currency := select( macroplan, Currency_MP, currency, currency.Name() = currencyName );
|
| if( this.Run().AssertNotIsNull( currency, 'Verify base currency failed as no currency found with Name = ' + currencyName ) )
| {
| this.Run().AssertTrue( currency.IsBase(), 'Expected the currency "' + currency.Name() + '" to be base currency.' );
| }
| *]
| InterfaceProperties { Accessibility: 'Module' }
| }
|
|
