X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/b2bedb6b5eff41a17ddb194df1c75213b841f3bb..bc0e2edad8e8f94f85f2a59ceb784b8eb0cda97c:/SL/DB/Part.pm diff --git a/SL/DB/Part.pm b/SL/DB/Part.pm index 8036db532..6dde98f4d 100644 --- a/SL/DB/Part.pm +++ b/SL/DB/Part.pm @@ -413,13 +413,6 @@ sub items_lastcost_sum { sum map { $_->linetotal_lastcost } @{$self->items}; }; -sub assortment_lastcost_sum { - my ($self) = @_; - - return unless $self->is_assortment; - sum map { $_->linetotal_lastcost } @{$self->assortment_items}; -}; - 1; __END__ @@ -562,21 +555,9 @@ Used to set the accounting information from a L object. Please note, that this is a write only accessor, the original Buchungsgruppe can not be retrieved from an article once set. -=item C - -Non-recursive sellprice sum of all the assembly item sellprices. - -=item C - -Non-recursive sellprice sum of all the assortment item sellprices. - -=item C - -Non-recursive lastcost sum of all the assembly item lastcosts. - -=item C +=item C -Non-recursive lastcost sum of all the assortment item lastcosts. +Non-recursive lastcost sum of all the items in an assembly or assortment. =item C