S:D:Manager:ReconciliationLink: nicht initialisierter Wert: Warnungen vermeiden
[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 use SL::System::TaskServer;
8
9 sub run {
10   my ($self, $db_obj) = @_;
11   my $data            = $db_obj->data_as_hash;
12
13   $::lxdebug->message(0, "Test job ID " . $db_obj->id . " is being executed on node " . SL::System::TaskServer::node_id() . ".");
14
15   die "Oh cruel world: " . $data->{exception} if $data->{exception};
16
17   return exists $data->{result} ? $data->{result} : 1;
18 }
19
20 1;