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
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method PTF_HasUniqueUser ( 
 |    structured[LibPTF_TestScript] testscripts, 
 |    Boolean scriptlevel, 
 |    output String feedback_o 
 |  ) as Boolean id:Method_LibPTF_frmTestScenario_PTF_HasUniqueUser 
 |  { 
 |    #keys: '[103546.0.99817976]' 
 |    Body: 
 |    [* 
 |      // Checks if all the selected test scripts has unique username entered 
 |      // This is because the username is currently being used as a unique identifier to identify a script 
 |      value := selectduplicates( testscripts, 
 |                                 Elements, 
 |                                 s, 
 |                                 true, 
 |                                 s.User().ToUpper() 
 |                               ).Size() = 0; 
 |       
 |      if( not value ) 
 |      { 
 |        // Different information for different levels of execution ( script / scenario ) 
 |        if( scriptlevel ) 
 |        { 
 |          feedback_o := feedback_o + "All selected test scripts must have a different user name" + String::NewLine(); 
 |        } 
 |        else 
 |        { 
 |          feedback_o := feedback_o + "All test scripts of all selected scenarios must have a different user name" + String::NewLine(); 
 |        } 
 |      } 
 |       
 |      return value; 
 |    *] 
 |  } 
 |  
  |