X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=SL%2FDB%2FDeliveryOrder.pm;h=372a5cc3a60df0cca375478ab6dc949378e68bb5;hb=dfcefa49d0da88facf307cf40e25ee1a1e39be0c;hp=a48dad74c6c021e4a40461a91fdf0e1ce67f3d7d;hpb=4f15333b8cc0ae1b0b4089adc2e516ba002b298b;p=kivitendo-erp.git diff --git a/SL/DB/DeliveryOrder.pm b/SL/DB/DeliveryOrder.pm index a48dad74c..372a5cc3a 100644 --- a/SL/DB/DeliveryOrder.pm +++ b/SL/DB/DeliveryOrder.pm @@ -2,31 +2,52 @@ package SL::DB::DeliveryOrder; use strict; +use Carp; + use SL::DB::MetaSetup::DeliveryOrder; use SL::DB::Manager::DeliveryOrder; use SL::DB::Helper::LinkedRecords; use SL::DB::Helper::TransNumberGenerator; -use SL::DB::Order; use List::Util qw(first); __PACKAGE__->meta->add_relationship(orderitems => { type => 'one to many', class => 'SL::DB::DeliveryOrderItem', column_map => { id => 'delivery_order_id' }, - manager_args => { with_objects => [ 'parts' ] } + manager_args => { with_objects => [ 'part' ] } }, ); __PACKAGE__->meta->initialize; +__PACKAGE__->before_save('_before_save_set_donumber'); + +# hooks + +sub _before_save_set_donumber { + my ($self) = @_; + + $self->create_trans_number if !$self->donumber; + + return 1; +} + # methods sub items { goto &orderitems; } +sub items_sorted { + my ($self) = @_; + + return [ sort {$a->id <=> $b->id } @{ $self->items } ]; +} + sub sales_order { my $self = shift; my %params = @_; + + require SL::DB::Order; my $orders = SL::DB::Manager::Order->get_all( query => [ ordnumber => $self->ordnumber, @@ -49,4 +70,8 @@ sub displayable_state { ($self->delivered ? $::locale->text('delivered') : $::locale->text('not delivered')); } +sub date { + goto &transdate; +} + 1;