lazhen
2024-05-30 7ba9073f61f44b41b941ab6ee732d02b47b988f4
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
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 );
  *]
}