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