Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision dacc0f08

Von Sven Schöling vor mehr als 1 Jahr hinzugefügt

  • ID dacc0f08e81467e308de8bec0905bdd62fa165ad
  • Vorgänger ba803e5d
  • Nachfolger d4fcd637

RecordLink: post save hook für alle Hauptbelege

Unterschiede anzeigen:

SL/DB/DeliveryOrder.pm
use SL::DB::Helper::FlattenToForm;
use SL::DB::Helper::LinkedRecords;
use SL::DB::Helper::TransNumberGenerator;
use SL::DB::Helper::RecordLink qw(RECORD_ID RECORD_TYPE_REF);
use SL::DB::Part;
use SL::DB::Unit;
......
__PACKAGE__->attr_sorted('items');
__PACKAGE__->before_save('_before_save_set_donumber');
__PACKAGE__->after_save('_after_save_link_records');
# hooks
......
return 1;
}
sub _after_save_link_records {
my ($self) = @_;
my @allowed_record_sources = qw(SL::DB::Reclamation SL::DB::Order);
my @allowed_item_sources = qw(SL::DB::ReclamationItem SL::DB::OrderItem);
SL::DB::Helper::RecordLink::link_records(
$self,
\@allowed_record_sources,
\@allowed_item_sources,
close_source_quotations => 1,
);
}
# methods
sub items { goto &orderitems; }

Auch abrufbar als: Unified diff