yypsybs
2023-09-09 3cb5a54def670d97301f07170fcaad213bfc54f2
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
26
27
28
29
30
31
32
33
Quintiq file version 2.0
#parent: #root
StaticMethod CreateUnit (
  MacroPlan macroplan,
  String unitid,
  String unitname,
  UnitOfMeasure_MP unitofmeasurement,
  String currencyid,
  Unit parentunit,
  String unittype,
  String stockingpointtype,
  SupplyChainView supplychainview,
  Number gridx,
  Number gridy,
  Boolean isfromdb
) as Unit
{
  TextBody:
  [*
    unit := select( macroplan, Unit, u, u.ID() = unitid );
    if ( isnull ( unit ) )
    {
      unit := Unit::Create( unitid,
                            macroplan, 
                            unitname,
                            unitofmeasurement,
                            parentunit, unittype, stockingpointtype, supplychainview, gridx, gridy, isfromdb ); 
      unit.CurrencyID( currencyid );
    }  
    return unit;
  *]
  InterfaceProperties { Accessibility: 'Module' }
}