25 lines
984 B
Perl
25 lines
984 B
Perl
package Koha::Exceptions::Report;
|
|
|
|
use Modern::Perl;
|
|
|
|
use Exception::Class (
|
|
'Koha::Exceptions::Report' => { description => "Something went wrong!" },
|
|
'Koha::Exceptions::Report::DuplicateRunning' => {
|
|
isa => 'Koha::Exceptions::Report',
|
|
description => "The configured per-user limit on simultaneous runs of this report has been reached",
|
|
fields => [ 'report_id', 'user_id', 'limit' ],
|
|
},
|
|
'Koha::Exceptions::Report::TotalRunning' => {
|
|
isa => 'Koha::Exceptions::Report',
|
|
description => "The configured per-user limit on total simultaneous report runs has been reached",
|
|
fields => [ 'user_id', 'limit' ],
|
|
},
|
|
'Koha::Exceptions::Report::InstanceTotalRunning' => {
|
|
isa => 'Koha::Exceptions::Report',
|
|
description => "The configured instance-wide limit on total simultaneous report runs has been reached",
|
|
fields => ['limit'],
|
|
}
|
|
);
|
|
|
|
1;
|