| 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 = ''; |  |   *] |  | } | 
 |