Revision 25b2b861
Von Bernd Bleßmann vor mehr als 3 Jahren hinzugefügt
SL/DN.pm | ||
---|---|---|
416 | 416 |
$self->print_dunning($myconfig, $form, $dunning_id, $dbh); |
417 | 417 |
|
418 | 418 |
if ($print_invoice) { |
419 |
$self->print_original_invoices($myconfig, $form, $_) for @invoice_ids;
|
|
419 |
$self->print_original_invoice($myconfig, $form, $_) for @invoice_ids; |
|
420 | 420 |
} |
421 | 421 |
|
422 | 422 |
if ($send_email) { |
... | ... | |
1202 | 1202 |
|
1203 | 1203 |
} |
1204 | 1204 |
|
1205 |
sub print_original_invoices {
|
|
1205 |
sub print_original_invoice { |
|
1206 | 1206 |
my ($self, $myconfig, $form, $invoice_id) = @_; |
1207 | 1207 |
# get one invoice as object and print to pdf |
1208 | 1208 |
my $invoice = SL::DB::Invoice->new(id => $invoice_id)->load; |
Auch abrufbar als: Unified diff
SL::DN: print_original_invoices in print_original_invoice umbenannt, …
… da nur eine Rechnung gedruckt wird.