kivitendo/SL/PriceSource/ALL.pm @ 43ad0ced
| eebe8e90 | Sven Schöling | package SL::PriceSource::ALL;
|
||
use strict;
|
||||
use SL::PriceSource::Pricegroup;
|
||||
use SL::PriceSource::MasterData;
|
||||
| df1b03d5 | Sven Schöling | use SL::PriceSource::Makemodel;
|
||
| 62f21410 | Martin Helmling | use SL::PriceSource::CustomerPrice;
|
||
| 89b26688 | Sven Schöling | use SL::PriceSource::Customer;
|
||
use SL::PriceSource::Vendor;
|
||||
use SL::PriceSource::Business;
|
||||
| 9589ecd7 | Sven Schöling | use SL::PriceSource::PriceRules;
|
||
| eebe8e90 | Sven Schöling | |||
my %price_sources_by_name = (
|
||||
| 9596d4a4 | Bernd Bleßmann | master_data => 'SL::PriceSource::MasterData',
|
||
customer_discount => 'SL::PriceSource::Customer',
|
||||
vendor_discount => 'SL::PriceSource::Vendor',
|
||||
pricegroup => 'SL::PriceSource::Pricegroup',
|
||||
makemodel => 'SL::PriceSource::Makemodel',
|
||||
| 62f21410 | Martin Helmling | customerprice => 'SL::PriceSource::CustomerPrice',
|
||
| 9596d4a4 | Bernd Bleßmann | business => 'SL::PriceSource::Business',
|
||
price_rules => 'SL::PriceSource::PriceRules',
|
||||
| eebe8e90 | Sven Schöling | );
|
||
my @price_sources_order = qw(
|
||||
master_data
|
||||
| 9596d4a4 | Bernd Bleßmann | customer_discount
|
||
vendor_discount
|
||||
| eebe8e90 | Sven Schöling | pricegroup
|
||
| df1b03d5 | Sven Schöling | makemodel
|
||
| 62f21410 | Martin Helmling | customerprice
|
||
| 89b26688 | Sven Schöling | business
|
||
| 9589ecd7 | Sven Schöling | price_rules
|
||
| eebe8e90 | Sven Schöling | );
|
||
| 5384e5cb | Sven Schöling | sub all_enabled_price_sources {
|
||
| 392e0365 | Sven Schöling | my %disabled = map { $_ => 1 } @{ $::instance_conf->get_disabled_price_sources || [] };
|
||
| 5384e5cb | Sven Schöling | |||
map { $price_sources_by_name{$_} } grep { !$disabled{$_} } @price_sources_order;
|
||||
}
|
||||
| eebe8e90 | Sven Schöling | sub all_price_sources {
|
||
map { $price_sources_by_name{$_} } @price_sources_order;
|
||||
}
|
||||
sub price_source_class_by_name {
|
||||
$price_sources_by_name{$_[1]};
|
||||
}
|
||||
1;
|