Verbrauchsbericht: Lager->Berichte->Lagerentnahme
[kivitendo-erp.git] / SL / BackgroundJob / Test.pm
1 package SL::BackgroundJob::Test;
2
3 use strict;
4
5 use parent qw(SL::BackgroundJob::Base);
6
7 sub run {
8   my ($self, $db_obj) = @_;
9   my $data            = $db_obj->data_as_hash;
10
11   $::lxdebug->message(0, "Test job is being executed.");
12
13   die "Oh cruel world: " . $data->{exception} if $data->{exception};
14
15   return exists $data->{result} ? $data->{result} : 1;
16 }
17
18 1;