Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision d51907d6

Von Bernd Bleßmann vor mehr als 2 Jahren hinzugefügt

  • ID d51907d65c0bd3b8e9fcbded6ce27b2c74e1371f
  • Vorgänger e9c278f5
  • Nachfolger a12969f8

Auftragzentrische verknüpfte Belege: Funktionsnamen deutlicher (Verkaufsaufträge)

Unterschiede anzeigen:

SL/Controller/RecordLinks.pm
69 69

  
70 70
  eval {
71 71
    my $linked_records = ($::instance_conf->get_always_record_links_from_order && ref $self->object ne 'SL::DB::Order')
72
                       ?  $self->object->order_centric_linked_records()
72
                       ?  $self->object->sales_order_centric_linked_records()
73 73
                       :  $self->object->linked_records(direction => 'both', recursive => 1, save_path => 1);
74 74

  
75 75
    push @{ $linked_records }, $self->object->sepa_export_items if $self->object->can('sepa_export_items');
SL/DB/Helper/LinkedRecords.pm
4 4

  
5 5
require Exporter;
6 6
our @ISA    = qw(Exporter);
7
our @EXPORT = qw(linked_records link_to_record order_centric_linked_records);
7
our @EXPORT = qw(linked_records link_to_record sales_order_centric_linked_records);
8 8

  
9 9
use Carp;
10 10
use List::MoreUtils qw(any);
......
395 395
  return \@records;
396 396
}
397 397

  
398
sub order_centric_linked_records {
398
sub sales_order_centric_linked_records {
399 399
  my ($self) = @_;
400 400

  
401 401
  my $all_linked_records = $self->linked_records(direction => 'from', recursive => 1);

Auch abrufbar als: Unified diff