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 DMF_Execute_SetBaseCurrency
| {
| Description: 'Set the instance as default base on globalprameter settings'
| TextBody:
| [*
| // Migrate base currency to instance IsBase = true
| basecurrency := select( this,
| Currency_MP,
| cur,
| cur.Name() = this.GlobalParameters_MP().BaseCurrency_DELETED_GA18() );
|
| if ( not isnull( basecurrency ) )
| {
| basecurrency.IsBase( true );
| }
| *]
| }
|
|