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
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
|
# --
# Copyright (C) 2001-2021 OTRS AG, https://otrs.com/
# Copyright (C) 2021 Znuny GmbH, https://znuny.org/
# --
# This software comes with ABSOLUTELY NO WARRANTY. For details, see
# the enclosed file COPYING for license information (GPL). If you
# did not receive this file, see https://www.gnu.org/licenses/gpl-3.0.txt.
# --
## no critic (Modules::RequireExplicitPackage)
use strict;
use warnings;
use utf8;
use vars (qw($Self));
my $Selenium = $Kernel::OM->Get('Kernel::System::UnitTest::Selenium');
$Selenium->RunTest(
sub {
my $HelperObject = $Kernel::OM->Get('Kernel::System::UnitTest::Helper');
# Do not check RichText.
$HelperObject->ConfigSettingChange(
Valid => 1,
Key => 'Frontend::RichText',
Value => 0,
);
# Create test user and login.
my $TestUserLogin = $HelperObject->TestUserCreate(
Groups => [ 'admin', 'users' ],
) || die "Did not get test user";
$Selenium->Login(
Type => 'Agent',
User => $TestUserLogin,
Password => $TestUserLogin,
);
# Define test cases.
my @Queues = ( '', 'Raw', 'Postmaster', 'NotExsising123', '' );
my $QueueObject = $Kernel::OM->Get('Kernel::System::Queue');
for my $Queue (@Queues) {
# Enable or disable setting that will influence the new phone ticket initial screen
if ($Queue) {
$HelperObject->ConfigSettingChange(
Valid => 1,
Key => 'Ticket::Frontend::UserDefaultQueue',
Value => $Queue,
);
}
else {
$HelperObject->ConfigSettingChange(
Valid => 0,
Key => 'Ticket::Frontend::UserDefaultQueue',
Value => 'Raw',
);
}
my $ScriptAlias = $Kernel::OM->Get('Kernel::Config')->Get('ScriptAlias');
# Navigate to new phone ticket.
$Selenium->VerifiedGet("${ScriptAlias}index.pl?Action=AgentTicketPhone");
# Check page.
for my $ID (
qw(FromCustomer CustomerID Dest Subject RichText FileUpload
NextStateID PriorityID submitRichText)
)
{
my $Element = $Selenium->find_element( "#$ID", 'css' );
$Element->is_enabled();
$Element->is_displayed();
}
# Depending on the test case check if the queue is preselected or not
if ( $Queue && $Queue ne 'NotExsising123' ) {
my $QueueID = $QueueObject->QueueLookup( Queue => $Queue );
$Self->Is(
$Selenium->execute_script(
"return \$('#Dest').val()"
),
"$QueueID||$Queue",
"$Queue is preselected",
);
}
else {
$Self->Is(
$Selenium->execute_script(
"return \$('#Dest').val()"
),
'||-',
'No queue is preselected',
);
}
}
}
);
1;
|
