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
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  StaticMethod GetIsUniqueCost ( 
 |    output String feedback_o, 
 |    AccountCost accountCost, 
 |    AccountCosts ownerAccountCosts, 
 |    String accountName, 
 |    String costDriver, 
 |    Date start, 
 |    String costType 
 |  ) declarative remote as Boolean 
 |  { 
 |    Description: 
 |    [* 
 |      Verify for single account cost creation if unique. In web app, generic translation message if cost not unique. 
 |       
 |      1. UnitCost 
 |      2. OperationCost 
 |    *] 
 |    TextBody: 
 |    [* 
 |      // Check cost is unique within the owner account costs 
 |      isvalid := AccountCost::GetIsUniqueCost( accountCost, 
 |                                               accountName, 
 |                                               costDriver, 
 |                                               start, 
 |                                               ownerAccountCosts ); 
 |       
 |      if( not isvalid ) 
 |      { 
 |        if( feedback_o <> '' ) 
 |        { 
 |          feedback_o := feedback_o + String::NewLine(); 
 |        } 
 |        // The feedback will use the set owner id to inform user from tooltip 
 |        feedback_o := feedback_o + Translations::MP_AccountCost_Web_IsNotUnique( costType ); 
 |      } 
 |       
 |      return feedback_o = ''; 
 |    *] 
 |  } 
 |  
  |