lazhen
2025-01-09 8afe90b633046db39042aada36b88193062f8cff
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
Quintiq file version 2.0
#parent: #root
Method IsCurrentDatasetChecked (LibDEF_SetInterestOfDataset datasetInterest_i) as Boolean id:Method_LibDEF_FormIntegration_IsCurrentDatasetChecked
{
  #keys: '[122658.0.629778446]'
  Body:
  [*
    // Checks if the DatasetInterest belongs to the current dataset
    feedback := FeedbackObject::LocalFeedback();
    
    currentMDSID := this.GetPlanningDatasetMDS().MDSID();
    value        := datasetInterest_i.DatasetMDSID() = currentMDSID;
    
    if( not value )
    {
      expectedDatasetString := LibDEF_Util::FormatDatasetString( datasetInterest_i.DatasetKind(),
                                                                 datasetInterest_i.DatasetPath(),
                                                                 datasetInterest_i.DatasetName() );
    
      actualMDSObjInfo    := ExternalMDSEditor::Editor().LoadedObjectInfo( currentMDSID );
      actualDatasetString := LibDEF_Util::FormatDatasetString( actualMDSObjInfo.Kind(),
                                                               actualMDSObjInfo.Path(),
                                                               actualMDSObjInfo.Name() );
    
      feedback.AddHard( "Dataset selected [" +
                        actualDatasetString +
                        "] is not the dataset subscribed [" +
                        expectedDatasetString +
                        "] to the Set." );
    }
    
    return feedback.IsAllowed();
  *]
}