Revision e1c3b6b7
Von Bernd Bleßmann vor mehr als 9 Jahren hinzugefügt
| SL/PriceSource/PriceRules.pm | ||
|---|---|---|
| 44 | 44 |
sub price_from_source {
|
| 45 | 45 |
my ($self, $source, $spec) = @_; |
| 46 | 46 |
|
| 47 |
my $rule = SL::DB::Manager::PriceRule->find_by(id => $spec); |
|
| 48 |
if ($rule->price_type != SL::DB::Manager::PriceRule::PRICE_DISCOUNT()) {
|
|
| 49 |
return $self->make_price_from_rule($rule); |
|
| 50 |
} |
|
| 51 |
|
|
| 52 |
return; |
|
| 53 |
} |
|
| 54 |
|
|
| 55 |
sub discount_from_source {
|
|
| 56 |
my ($self, $source, $spec) = @_; |
|
| 57 |
|
|
| 47 | 58 |
my $rule = SL::DB::Manager::PriceRule->find_by(id => $spec); |
| 48 | 59 |
if ($rule->price_type == SL::DB::Manager::PriceRule::PRICE_DISCOUNT()) {
|
| 49 | 60 |
return $self->make_discount_from_rule($rule); |
| 50 |
} else {
|
|
| 51 |
return $self->make_price_from_rule($rule); |
|
| 52 | 61 |
} |
| 62 |
|
|
| 63 |
return; |
|
| 53 | 64 |
} |
| 54 | 65 |
|
| 55 | 66 |
sub best_price {
|
Auch abrufbar als: Unified diff
PriceSources: discount_from_source analog zu price_from_source implemeniert.
Wenn keine zur Rabatt-Quelle passende Klasse gefunden werden kann, wird auch
hier ein spezieller leerer Rabatt zurückgeliefert.