陈清红
2025-04-14 880f3c0257eeb8c37761d484258fdd102a369a19
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
35
36
37
38
39
40
41
42
Quintiq file version 2.0
#parent: #root
Method AddPlannedResourceUtilizationForExport (
  String scenario,
  String resource,
  Date startdate,
  Date enddate,
  Real availablecapacity,
  Real usedcapacity
)
{
  Description: 'Verify duplicate then append PlannedResourceUtilization to PlannedResourceUtilizationCache'
  TextBody:
  [*
    // Check if the PlannedResourceUtilization is already existing
    existingPlannedResourceUtilization := LibSCIPlannedResourceUtilization::FindLibSCIPlannedResourceUtilizationTypeIndex( scenario, resource, startdate );
    if( isnull( existingPlannedResourceUtilization ) )
    {
      this.LibSCIPlannedResourceUtilization( relnew,
                                             Scenario := scenario,
                                             Resource := resource, 
                                             StartDate := startdate,
                                             EndDate := enddate,
                                             AvailableCapacity := availablecapacity, 
                                             UsedCapacity := usedcapacity );
                         
      content := construct( Strings );
      
      content.Add( LibSCIIntegration_Utility::FormatString( scenario ) );            // scenario
      content.Add( LibSCIIntegration_Utility::FormatString( resource ) );           // resource
      content.Add( LibSCIIntegration_Utility::DateToStringISOConverter( startdate ) ); 
      content.Add( LibSCIIntegration_Utility::DateToStringISOConverter( enddate ) );
      // Cater for case if value is in decimal comma 
      content.Add( LibSCIIntegration_Utility::FormatString( LibSCIIntegration_Utility::RealToString( availablecapacity ) ) );
      content.Add( LibSCIIntegration_Utility::FormatString( LibSCIIntegration_Utility::RealToString( usedcapacity ) ) );   
    
      addedvalues := content.ToString( LibSCIIntegration_Utility::Tokenizer() );
      addedvalues := this.PlannedResourceUtilizationCache() + String::NewLine() + addedvalues;
      this.PlannedResourceUtilizationCache( addedvalues );     
    }
  *]
}