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