Files
scripts/Perl OTRS/Kernel/Output/HTML/ToolBar/TicketLocked.pm
2024-10-14 00:08:40 +02:00

122 lines
3.9 KiB
Perl

# --
# Copyright (C) 2001-2019 OTRS AG, https://otrs.com/
# --
# 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.
# --
package Kernel::Output::HTML::ToolBar::TicketLocked;
use parent 'Kernel::Output::HTML::Base';
use strict;
use warnings;
use Kernel::Language qw(Translatable);
our @ObjectDependencies = (
'Kernel::Config',
'Kernel::Output::HTML::Layout',
'Kernel::System::Log',
'Kernel::System::Ticket',
);
sub Run {
my ( $Self, %Param ) = @_;
# check needed stuff
for (qw(Config)) {
if ( !$Param{$_} ) {
$Kernel::OM->Get('Kernel::System::Log')->Log(
Priority => 'error',
Message => "Need $_!"
);
return;
}
}
return if !$Kernel::OM->Get('Kernel::Config')->Get('Frontend::Module')->{AgentTicketLockedView};
# get ticket object
my $TicketObject = $Kernel::OM->Get('Kernel::System::Ticket');
# get user lock data
my $Count = $TicketObject->TicketSearch(
Result => 'COUNT',
Locks => [ 'lock', 'tmp_lock' ],
OwnerIDs => [ $Self->{UserID} ],
UserID => 1,
Permission => 'ro',
) || 0;
my $CountNew = $TicketObject->TicketSearch(
Result => 'COUNT',
Locks => [ 'lock', 'tmp_lock' ],
OwnerIDs => [ $Self->{UserID} ],
TicketFlag => {
Seen => 1,
},
TicketFlagUserID => $Self->{UserID},
UserID => 1,
Permission => 'ro',
) || 0;
$CountNew = $Count - $CountNew;
my $CountReached = $TicketObject->TicketSearch(
Result => 'COUNT',
Locks => [ 'lock', 'tmp_lock' ],
StateType => ['pending reminder'],
TicketPendingTimeOlderMinutes => 1,
OwnerIDs => [ $Self->{UserID} ],
UserID => 1,
Permission => 'ro',
) || 0;
my $Class = $Param{Config}->{CssClass};
my $ClassNew = $Param{Config}->{CssClassNew};
my $ClassReached = $Param{Config}->{CssClassReached};
my $Icon = $Param{Config}->{Icon};
my $IconNew = $Param{Config}->{IconNew};
my $IconReached = $Param{Config}->{IconReached};
my $URL = $Kernel::OM->Get('Kernel::Output::HTML::Layout')->{Baselink};
my %Return;
my $Priority = $Param{Config}->{Priority};
if ($CountNew) {
$Return{ $Priority++ } = {
Block => 'ToolBarItem',
Count => $CountNew,
Description => Translatable('Locked Tickets New'),
Class => $ClassNew,
Icon => $IconNew,
Link => $URL . 'Action=AgentTicketLockedView;Filter=New',
AccessKey => $Param{Config}->{AccessKeyNew} || '',
};
}
if ($CountReached) {
$Return{ $Priority++ } = {
Block => 'ToolBarItem',
Count => $CountReached,
Description => Translatable('Locked Tickets Reminder Reached'),
Class => $ClassReached,
Icon => $IconReached,
Link => $URL . 'Action=AgentTicketLockedView;Filter=ReminderReached',
AccessKey => $Param{Config}->{AccessKeyReached} || '',
};
}
if ($Count) {
$Return{ $Priority++ } = {
Block => 'ToolBarItem',
Count => $Count,
Description => Translatable('Locked Tickets Total'),
Class => $Class,
Icon => $Icon,
Link => $URL . 'Action=AgentTicketLockedView',
AccessKey => $Param{Config}->{AccessKey} || '',
};
}
return %Return;
}
1;