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
| StaticMethod CreateCurrecyAndCurrencyRate (
| MacroPlan macroplan,
| String currencyid,
| String currencyname,
| String currencysymbol,
| Boolean isbase,
| Boolean isfromdb,
| Date currencyratestartdate,
| Real currencyrate
| )
| {
| Description: 'Create a new currency and currency rate'
| TextBody:
| [*
| currency := select( macroplan, Currency_MP, c, c.ID() = currencyid);
| if ( isnull( currency ) )
| {
| currency := Currency_MP::Create( currencyid, macroplan, currencyname, currencysymbol, isbase, isfromdb );
| CurrencyRate_MP::Create( currency, currencyratestartdate, currencyrate, isfromdb );
| }
| *]
| InterfaceProperties { Accessibility: 'Module' }
| }
|
|
