Revision 615a5a85
Von Jan Büren vor etwa 2 Jahren hinzugefügt
SL/BackgroundJob/SelfTest.pm | ||
---|---|---|
26 | 26 |
'add_full_diag' => { interface => 'add', hash_key => 'full_diag' }, |
27 | 27 |
], |
28 | 28 |
scalar => [ |
29 |
qw(diag tester config aggreg module_nr), |
|
29 |
qw(diag tester config aggreg module_nr additional_email),
|
|
30 | 30 |
], |
31 | 31 |
); |
32 | 32 |
|
... | ... | |
48 | 48 |
|
49 | 49 |
sub run { |
50 | 50 |
my $self = shift; |
51 |
my $db_obj = shift; |
|
51 | 52 |
$self->setup; |
52 | 53 |
|
53 | 54 |
return 1 unless $self->modules; |
54 | 55 |
|
56 |
# set additional mail |
|
57 |
my $options = $db_obj->data_as_hash; |
|
58 |
$self->additional_email($options->{email}) if $options->{email} =~ m/(\S+)@(\S+)$/; |
|
59 |
|
|
55 | 60 |
foreach my $module ($self->modules) { |
56 | 61 |
$self->run_module($module); |
57 | 62 |
} |
... | ... | |
128 | 133 |
|
129 | 134 |
return unless $email; |
130 | 135 |
|
136 |
$email .= $self->additional_email ? ',' . $self->additional_email : ''; |
|
137 |
|
|
131 | 138 |
my ($output, $content_type) = $self->_prepare_report; |
132 | 139 |
|
133 | 140 |
my $mail = Mailer->new; |
doc/changelog | ||
---|---|---|
9 | 9 |
- Die Variablen zur Ersetzung der Zahlungsbedingungen stehen auch als einzelne |
10 | 10 |
Variable für das Druckvorlagensystem zu Verfügung, bspw. bezeichnet |
11 | 11 |
<%invtotal_wo_skonto%> den Rechnungsbetrag abzgl. des Skontos. |
12 |
- Bei den Transaktions-SelfTest kann eine optional weitere E-Mail-Adresse direkt |
|
13 |
beim Anlegen des Hintergrundjobs im Textfeld data json formatiert wie folgt |
|
14 |
hinzugefügt werden 'email: meine@email.adresse' (Hochkommatas weglassen). |
|
12 | 15 |
|
13 | 16 |
2022-09-19 - Release 3.7.0 |
14 | 17 |
|
Auch abrufbar als: Unified diff
SelfTest, Optional eine weitere E-Mail-Adresse beim Hintergrund-Job angeben