X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FOrder.pm;h=d61ec31ebcf402f859711cbb21ad8b00b2f93cf9;hb=4247547d2a925ddad7006cae89e5f9f1fda7d469;hp=f73e32ca04273951909779b1eab621de0be54979;hpb=3624b119556731da41e4ad395491ebb067f26565;p=kivitendo-erp.git diff --git a/SL/DB/Order.pm b/SL/DB/Order.pm index f73e32ca0..d61ec31eb 100644 --- a/SL/DB/Order.pm +++ b/SL/DB/Order.pm @@ -67,6 +67,7 @@ sub _before_save_set_ord_quo_number { sub items { goto &orderitems; } sub add_items { goto &add_orderitems; } +sub record_number { goto &number; } sub type { my $self = shift; @@ -94,6 +95,9 @@ sub displayable_type { die 'invalid type'; } +sub displayable_name { + join ' ', grep $_, map $_[0]->$_, qw(displayable_type record_number); +}; sub is_sales { croak 'not an accessor' if @_ > 1;