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

63 lines
1.7 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::Notification::AgentCloudServicesDisabled;
use parent 'Kernel::Output::HTML::Base';
use strict;
use warnings;
use utf8;
our @ObjectDependencies = (
'Kernel::Config',
'Kernel::Output::HTML::Layout',
'Kernel::System::Group',
);
sub Run {
my ( $Self, %Param ) = @_;
my $Output = '';
# check if cloud services are disabled
my $CloudServicesDisabled = $Kernel::OM->Get('Kernel::Config')->Get('CloudServices::Disabled') || 0;
return '' if !$CloudServicesDisabled;
return '' if $Param{Type} ne 'Admin';
my $Group = $Param{Config}->{Group} || 'admin';
# get layout object
my $LayoutObject = $Kernel::OM->Get('Kernel::Output::HTML::Layout');
my $HasPermission = $Kernel::OM->Get('Kernel::System::Group')->PermissionCheck(
UserID => $Self->{UserID},
GroupName => $Group,
Type => 'rw',
);
# notification should only be visible for administrators
if ( !$HasPermission ) {
return '';
}
my $Text = '<a href="'
. $LayoutObject->{Baselink}
. 'Action=AdminSystemConfiguration;Subaction=View;Setting=CloudServices::Disabled'
. '">';
$Text .= $LayoutObject->{LanguageObject}->Translate('Enable cloud services to unleash all OTRS features!');
$Text .= '</a>';
return $LayoutObject->Notify(
Data => $Text,
Priority => 'Info',
);
}
1;