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
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
|
# --
# 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.
# --
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');
my $TicketObject = $Kernel::OM->Get('Kernel::System::Ticket');
# Create test ticket.
my $TicketNumber = $TicketObject->TicketCreateNumber();
my $TicketID = $TicketObject->TicketCreate(
TN => $TicketNumber,
Title => 'Selenium ticket',
Queue => 'Raw',
Lock => 'unlock',
Priority => '3 normal',
State => 'new',
CustomerID => 'SeleniumCustomer',
CustomerUser => 'customer@example.com',
OwnerID => 1,
UserID => 1,
);
$Self->True(
$TicketID,
"Ticket is created - ID $TicketID",
);
# 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,
);
my $ScriptAlias = $Kernel::OM->Get('Kernel::Config')->Get('ScriptAlias');
# Navigate to created test ticket in AgentTicketZoom page
$Selenium->VerifiedGet("${ScriptAlias}index.pl?Action=AgentTicketZoom;TicketID=$TicketID");
# Force sub menus to be visible in order to be able to click one of the links
$Selenium->execute_script("\$('.Cluster ul ul').addClass('ForceVisible');");
# Click on lock
$Selenium->find_element("//a[contains(\@href, \'Action=AgentTicketLock;Subaction=Lock;TicketID=$TicketID;' )]")
->VerifiedClick();
# Verify that ticket is locked, navigate to AgentTicketLockedView
$Selenium->VerifiedGet("${ScriptAlias}index.pl?Action=AgentTicketLockedView");
$Self->True(
index( $Selenium->get_page_source(), $TicketNumber ) > -1,
"Ticket with ticket number $TicketNumber found on locked view page",
);
# Return back to AgentTicketZoom for created test ticket
$Selenium->VerifiedGet("${ScriptAlias}index.pl?Action=AgentTicketZoom;TicketID=$TicketID");
# Force sub menus to be visible in order to be able to click one of the links
$Selenium->execute_script("\$('.Cluster ul ul').addClass('ForceVisible');");
# Unlock ticket
$Selenium->find_element(
"//a[contains(\@href, \'Action=AgentTicketLock;Subaction=Unlock;TicketID=$TicketID;' )]"
)->VerifiedClick();
# Force sub menus to be visible in order to be able to click one of the links
$Selenium->execute_script("\$('.Cluster ul ul').addClass('ForceVisible');");
# Go to history view to verify results
$Selenium->VerifiedGet("${ScriptAlias}index.pl?Action=AgentTicketHistory;TicketID=$TicketID");
$Self->True(
index( $Selenium->get_page_source(), 'Locked ticket.' ) > -1,
"Ticket with ticket ID $TicketID was successfully locked",
);
$Self->True(
index( $Selenium->get_page_source(), 'Unlocked ticket.' ) > -1,
"Ticket with ticket ID $TicketID was successfully unlocked",
);
# Delete created test ticket.
my $Success = $TicketObject->TicketDelete(
TicketID => $TicketID,
UserID => 1,
);
# Ticket deletion could fail if apache still writes to ticket history. Try again in this case.
if ( !$Success ) {
sleep 3;
$Success = $TicketObject->TicketDelete(
TicketID => $TicketID,
UserID => 1,
);
}
$Self->True(
$Success,
"Ticket with ticket ID $TicketID is deleted"
);
# Make sure the cache is correct.
$Kernel::OM->Get('Kernel::System::Cache')->CleanUp( Type => 'Ticket' );
}
);
1;
|
