admin
2025-01-22 7e31442f0e9b07764e9c6a9680d3d4aeba5fe1de
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 ExportEntities
{
  Description: 'Method to export entities to message via QI'
  TextBody:
  [*
    // Initiate some variables including base NVT
    exportfilename := 'Entities.xml';
    routename := 'QuintiqExportEntitiesFileRoute';
    basenvt := NamedValueTree::Create();
    basenvt.Root( GlobalParameters_MP::GetDatasetMPSync() );
    mp := this.MacroPlan();
    
    units := selectset( mp, Unit, unit, true );
    this.ExportObjectToNVT( basenvt, units, typeof( IOUnit ) );
    
    stockingpoints := selectset( mp, StockingPoint_MP, sp, not sp.IsSystem() );
    this.ExportObjectToNVT( basenvt, stockingpoints, typeof( IOStockingPoint_MP ) );
    
    salessegments := selectset( mp, SalesSegment_MP, seg, true );
    this.ExportObjectToNVT( basenvt, salessegments, typeof( IOSalesSegment_MP ) );
    
    saleslevels := selectset( mp, SalesLevel_MP, slvl, true );
    this.ExportObjectToNVT( basenvt, saleslevels, typeof( IOSalesLevel_MP ) );
    
    groups := selectset( mp, Group, group, true );
    this.ExportObjectToNVT( basenvt, groups, typeof( IOGroup ) );
    
    this.ExportNVTToQI( exportfilename, routename, basenvt );
  *]
}