Revision d6d08d5e
Von Sven Schöling vor mehr als 10 Jahren hinzugefügt
| SL/Controller/RecordLinks.pm | ||
|---|---|---|
| 53 | 53 |
my ($self) = @_; |
| 54 | 54 |
|
| 55 | 55 |
eval {
|
| 56 |
my $linked_records = $self->object->linked_records(direction => 'both', recursive => 1); |
|
| 56 |
my $linked_records = $self->object->linked_records(direction => 'both', recursive => 1, save_path => 1);
|
|
| 57 | 57 |
push @{ $linked_records }, $self->object->sepa_export_items if $self->object->can('sepa_export_items');
|
| 58 | 58 |
my $output = SL::Presenter->get->grouped_record_list( |
| 59 | 59 |
$linked_records, |
| SL/DB/Helper/LinkedRecords.pm | ||
|---|---|---|
| 154 | 154 |
if ($params{save_path}) {
|
| 155 | 155 |
my %links_by_id = map { $_->{id} => $_ } @$links;
|
| 156 | 156 |
for (@objects) {
|
| 157 |
$_->{_record_link_path} = $links_by_id{$_->{_record_link}->id}->{path};
|
|
| 158 |
$_->{_record_link_depth} = $links_by_id{$_->{_record_link}->id}->{depth};
|
|
| 157 |
my $link = $links_by_id{$_->{_record_link}->id};
|
|
| 158 |
my $intermediate_links = SL::DB::Manager::RecordLink->get_all(query => [ id => $link->{path} ]);
|
|
| 159 |
$_->{_record_link_path} = $link->{path};
|
|
| 160 |
$_->{_record_link_obj_path} = [ map { $get_objects->($_) } @$intermediate_links ];
|
|
| 161 |
$_->{_record_link_depth} = $link->{depth};
|
|
| 159 | 162 |
} |
| 160 | 163 |
} |
| 161 | 164 |
|
| SL/Presenter/Record.pm | ||
|---|---|---|
| 75 | 75 |
if ($with_columns{record_link_direction}) {
|
| 76 | 76 |
push @columns, {
|
| 77 | 77 |
title => $::locale->text('Link direction'),
|
| 78 |
data => sub { $_[0]->{_record_link_direction} eq 'from' ? $::locale->text('Row was source for current record') : $::locale->text('Row was created from current record') },
|
|
| 78 |
data => sub {
|
|
| 79 |
$_[0]->{_record_link_depth} > 1
|
|
| 80 |
? $::locale->text('Row was linked to another record')
|
|
| 81 |
: $_[0]->{_record_link_direction} eq 'from'
|
|
| 82 |
? $::locale->text('Row was source for current record')
|
|
| 83 |
: $::locale->text('Row was created from current record') },
|
|
| 79 | 84 |
}; |
| 80 | 85 |
} |
| 81 | 86 |
|
| locale/de/all | ||
|---|---|---|
| 1964 | 1964 |
'Row #1: amount has to be different from zero.' => 'Zeile #1: Der Wert darf nicht 0 sein.', |
| 1965 | 1965 |
'Row number' => 'Zeilennummer', |
| 1966 | 1966 |
'Row was created from current record' => 'Zeile wurde aus aktuellem Beleg erstellt', |
| 1967 |
'Row was linked to another record' => 'Zeile wurde über einen anderen Beleg verlinkt', |
|
| 1967 | 1968 |
'Row was source for current record' => 'Zeile war Quelle für aktuellen Beleg', |
| 1968 | 1969 |
'Run at' => 'Ausgeführt um', |
| 1969 | 1970 |
'SAVED' => 'Gespeichert', |
Auch abrufbar als: Unified diff
RecordLinks: Anzeige etwas verbessert