Revision 07aa9777
Von Bernd Bleßmann vor etwa 3 Jahren hinzugefügt
| bin/mozilla/dn.pl | ||
|---|---|---|
| 456 | 456 |
push @files, SL::File->get_all_versions(object_id => $ref->{id},
|
| 457 | 457 |
object_type => 'dunning', |
| 458 | 458 |
file_type => 'document',); |
| 459 |
# object_type dunning_orig_invoice is the original dunned invoice. |
|
| 460 |
push @files, SL::File->get_all_versions(object_id => $ref->{id},
|
|
| 461 |
object_type => 'dunning_orig_invoice', |
|
| 462 |
file_type => 'document',); |
|
| 459 | 463 |
if (scalar @files) {
|
| 460 | 464 |
my $html = join '<br>', map { SL::Presenter::FileObject::file_object($_) } @files;
|
| 461 | 465 |
my $text = join "\n", map { $_->file_name } @files;
|
Auch abrufbar als: Unified diff
Mahnungen: DMS: orig. Rechnung als eigenen Typ