| Quintiq file version 2.0 | 
| #parent: #root | 
| Method ExportLanes | 
| { | 
|   Description: 'Method to export lanes to message via QI' | 
|   TextBody: | 
|   [* | 
|     // Initiate some variables including base NVT | 
|     exportfilename := 'Lanes.xml'; | 
|     routename := 'QuintiqExportLanesFileRoute'; | 
|     basenvt := NamedValueTree::Create(); | 
|     basenvt.Root( GlobalParameters_MP::GetDatasetMPSync() ); | 
|     mp := this.MacroPlan(); | 
|      | 
|     lanes := selectset( mp, Unit.Lane, ln, true ); | 
|     this.ExportObjectToNVT( basenvt, lanes, typeof( IOLane ) ); | 
|      | 
|     lanelegs := selectset( lanes, Elements.LaneLeg, ll, true ); | 
|     this.ExportObjectToNVT( basenvt, lanelegs, typeof( IOLaneLeg ) ); | 
|      | 
|     prodinlanes := selectset( mp, Product_MP.ProductInLane, pl, true ); | 
|     this.ExportObjectToNVT( basenvt, prodinlanes, typeof( IOProductInLane ) ); | 
|      | 
|     this.ExportNVTToQI( exportfilename, routename, basenvt ); | 
|   *] | 
| } |