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
43
44
45
46
47
48
49
50
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  StaticMethod GetIsUniqueCost ( 
 |    output String feedback_o, 
 |    Operations operations, 
 |    OperationCosts operationCosts, 
 |    String accountName, 
 |    String costDriver, 
 |    Date start 
 |  ) declarative remote as Boolean 
 |  { 
 |    Description: 'Precondition to check operation cost whether is unique' 
 |    TextBody: 
 |    [* 
 |      // Check dialog input is unique cost 
 |       
 |      isCreate := operationCosts.Size() = 0; // Empty cost indicate create mode (single create allowed only) 
 |       
 |      if( isCreate ) 
 |      { 
 |        // Separate validation on creation 
 |        // Single or drag&drop multiple 
 |        traverse( operations, Elements, operation ) 
 |        { 
 |          AccountCost::GetIsUniqueCost( feedback_o, 
 |                                        null( AccountCost ), 
 |                                        operation.OperationCost( relget ), 
 |                                        accountName, 
 |                                        costDriver, 
 |                                        start, 
 |                                        Translations::MP_AccountCost_Web_OperationCost() ); 
 |        } 
 |      } 
 |      else if( operationCosts.Size() = 1 ) // Single edit, as batch edit not allowed to change cost driver/start/account thus no validation required 
 |      { 
 |        // Don't use TC validation as the feedback text is generic. We want specific text when not unique 
 |        operationCostToEdit := operationCosts.Element( 0 ); 
 |        ownerOperationCosts := operations.Element( 0 ).OperationCost( relget ); 
 |         
 |        AccountCost::GetIsUniqueCost( feedback_o, 
 |                                      operationCostToEdit, 
 |                                      ownerOperationCosts, 
 |                                      accountName, 
 |                                      costDriver, 
 |                                      start, 
 |                                      Translations::MP_AccountCost_Web_OperationCost() ); 
 |      } 
 |      return feedback_o = ''; 
 |    *] 
 |  } 
 |  
  |