chenqinghong
2024-05-07 3ec06a830367465068963156dcc1d8e522571c13
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
Quintiq file version 2.0
#parent: #root
Method ExportGenerals
{
  Description: 'Method to export generals to message via QI'
  TextBody:
  [*
    // Initiate some variables including base NVT
    exportfilename := 'SupplyChainParameters.xml';
    routename := 'QuintiqExportSupplyChainParametersFileRoute';
    basenvt := NamedValueTree::Create();
    basenvt.Root( GlobalParameters_MP::GetDatasetMPSync() );
    mp := this.MacroPlan();
    
    uoms := selectset( mp, UnitOfMeasure_MP, um, true );
    this.ExportObjectToNVT( basenvt, uoms, typeof( IOUnitOfMeasure_MP ) );
    
    baseconvfacs := selectset( uoms, Elements.BaseConversionFactor, bc, true );
    this.ExportObjectToNVT( basenvt, baseconvfacs, typeof( IOBaseConversionFactor ) );
    
    currencies := selectset( mp, Currency_MP, cu, true );
    this.ExportObjectToNVT( basenvt, currencies, typeof( IOCurrency_MP ) );
    
    currrates := selectset( currencies, Elements.CurrencyRate_MP, cr, true );
    this.ExportObjectToNVT( basenvt, currrates, typeof( IOCurrencyRate_MP ) );
    
    priorities := selectset( mp, Priority, pr, true );
    this.ExportObjectToNVT( basenvt, priorities, typeof( IOPriority ) );
    
    this.ExportNVTToQI( exportfilename, routename, basenvt );
  *]
}