Revision 74fda0f4
Von Sven Schöling vor mehr als 1 Jahr hinzugefügt
| SL/DB/Part.pm | ||
|---|---|---|
|
use SL::DBUtils;
|
||
|
use SL::DB::MetaSetup::Part;
|
||
|
use SL::DB::Manager::Part;
|
||
|
use SL::DB::Chart;
|
||
|
use SL::DB::Helper::AttrHTML;
|
||
|
use SL::DB::Helper::AttrSorted;
|
||
|
use SL::DB::Helper::TransNumberGenerator;
|
||
| ... | ... | |
|
|
||
|
sub get_chart {
|
||
|
my ($self, %params) = @_;
|
||
|
require SL::DB::Chart;
|
||
|
|
||
|
my $type = (any { $_ eq $params{type} } qw(income expense inventory)) ? $params{type} : croak("Invalid 'type' parameter '$params{type}'");
|
||
|
my $taxzone = $params{ defined($params{taxzone}) ? 'taxzone' : 'taxzone_id' } * 1;
|
||
Auch abrufbar als: Unified diff
fix: mehr SL::DB zirkuläre includes