1 package SL::Controller::BackgroundJobHistory;
5 use parent qw(SL::Controller::Base);
7 use SL::DB::BackgroundJobHistory;
9 use SL::System::TaskServer;
11 use Rose::Object::MakeMethods::Generic
13 scalar => [ qw(history) ],
14 'scalar --get_set_init' => [ qw(task_server) ],
17 __PACKAGE__->run_before('check_auth');
18 __PACKAGE__->run_before('add_stylesheet');
19 __PACKAGE__->run_before('check_task_server');
28 $self->render('background_job_history/list',
29 title => $::locale->text('Background job history'),
30 ENTRIES => SL::DB::Manager::BackgroundJobHistory->get_all_sorted);
36 my $back_to = $::form->{back_to} || $self->url_for(action => 'list');
38 $self->history(SL::DB::BackgroundJobHistory->new(id => $::form->{id})->load);
39 $self->render('background_job_history/show',
40 title => $::locale->text('View background job execution result'),
49 $::auth->assert('admin');
56 sub init_task_server {
57 return SL::System::TaskServer->new;
60 sub check_task_server {
62 flash('warning', $::locale->text('The task server does not appear to be running.')) if !$self->task_server->is_running;
66 $::form->use_stylesheet('lx-office-erp/background_jobs.css');