Quintiq file version 2.0 
 | 
#parent: #root 
 | 
Method ExportFeedbacks 
 | 
{ 
 | 
  Description: 'Method to export feedbacks to message via QI' 
 | 
  TextBody: 
 | 
  [* 
 | 
    // Initiate some variables including base NVT 
 | 
    exportfilename := 'Feedbacks.xml'; 
 | 
    routename := 'QuintiqExportFeedbacksFileRoute'; 
 | 
    basenvt := NamedValueTree::Create(); 
 | 
    basenvt.Root( GlobalParameters_MP::GetDatasetMPSync() ); 
 | 
    mp := this.MacroPlan(); 
 | 
     
 | 
    feedbackperiodtaskoperations := selectset( mp, Feedback.astype( FeedbackPeriodTaskOperation ), fpto, true ); 
 | 
    this.ExportObjectToNVT( basenvt, feedbackperiodtaskoperations, typeof( IOFeedbackPeriodTaskOperation ) ); 
 | 
     
 | 
    feedbackproductintrips := selectset( mp, Feedback.astype( FeedbackProductInTrip ), fpit, true ); 
 | 
    this.ExportObjectToNVT( basenvt, feedbackproductintrips, typeof( IOFeedbackProductInTrip ) ); 
 | 
     
 | 
    this.ExportNVTToQI( exportfilename, routename, basenvt ); 
 | 
  *] 
 | 
} 
 |