X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/df1b03d578280d71fb839b437505dd283f6dd749..0b8b24545c98eb4cf22bda155d0e7efbf2bdcdb7:/SL/PriceSource/Pricegroup.pm diff --git a/SL/PriceSource/Pricegroup.pm b/SL/PriceSource/Pricegroup.pm index 127ec660e..2a8adae13 100644 --- a/SL/PriceSource/Pricegroup.pm +++ b/SL/PriceSource/Pricegroup.pm @@ -23,7 +23,7 @@ sub available_prices { my $prices = SL::DB::Manager::Price->get_all( query => [ parts_id => $item->parts_id, price => { gt => 0 } ], with_objects => 'pricegroup', - order_by => 'pricegroun.id', + order_by => 'pricegroup.id', ); return () unless @$prices; @@ -33,6 +33,8 @@ sub available_prices { } @$prices; } +sub available_discounts { } + sub price_from_source { my ($self, $source, $spec) = @_; @@ -57,6 +59,8 @@ sub best_price { return $best_price || (); } +sub best_discount { } + sub make_price { my ($self, $price_obj) = @_;