| Quintiq file version 2.0 | 
| #parent: #root | 
| Method ExportCapacities | 
| { | 
|   Description: 'Method to export capacities to message via QI' | 
|   TextBody: | 
|   [* | 
|     // Initiate some variables including base NVT | 
|     exportfilename := 'Capacities.xml'; | 
|     routename := 'QuintiqExportCapacitiesFileRoute'; | 
|     basenvt := NamedValueTree::Create(); | 
|     basenvt.Root( GlobalParameters_MP::GetDatasetMPSync() ); | 
|     mp := this.MacroPlan(); | 
|      | 
|     shiftpatterns := selectset( mp, ShiftPattern, sp, true ); | 
|     this.ExportObjectToNVT( basenvt, shiftpatterns, typeof( IOShiftPattern ) ); | 
|      | 
|     unitshiftpatterns := selectset( mp, Unit.UnitShiftPattern, usp , true ); | 
|     this.ExportObjectToNVT( basenvt, unitshiftpatterns, typeof( IOUnitShiftPattern ) ); | 
|      | 
|     shiftdays := selectset( mp, ShiftPattern.ShiftDay, sd, true ); | 
|     this.ExportObjectToNVT( basenvt, shiftdays, typeof( IOShiftDay ) ); | 
|      | 
|     stockingpointcapacities := selectset( mp, StockingPoint_MP.StockingPointCapacity, spc, true ); | 
|     this.ExportObjectToNVT( basenvt, stockingpointcapacities, typeof( IOStockingPointCapacity ) ); | 
|      | 
|     transportavailabilities := selectset( mp, Unit.TransportAvailability, ta, true ); | 
|     this.ExportObjectToNVT( basenvt, transportavailabilities, typeof( IOTransportAvailability ) );  | 
|      | 
|     transportcapacities := selectset( mp, Unit.TransportCapacity, tc, true ); | 
|     this.ExportObjectToNVT( basenvt, transportcapacities, typeof( IOTransportCapacity ) ); | 
|      | 
|     unitcalendarelements := selectset(  mp, Unit.UnitCalendarElement, uce, true ); | 
|     this.ExportObjectToNVT( basenvt, unitcalendarelements, typeof( IOUnitCalendarElement ) ); | 
|      | 
|     unitavailabilities := selectset(  mp, Unit.UnitAvailability, ua, true ); | 
|     this.ExportObjectToNVT( basenvt, unitavailabilities, typeof( IOUnitAvailability ) ); | 
|      | 
|     unitcapacities := selectset( mp, Unit.UnitCapacity, uc, true ); | 
|     this.ExportObjectToNVT( basenvt, unitcapacities, typeof( IOUnitCapacity ) ); | 
|      | 
|     // Export NVT to QI | 
|     this.ExportNVTToQI( exportfilename, routename, basenvt ); | 
|   *] | 
| } |