kivitendo/SL/DB/Buchungsgruppe.pm @ 8b6ad9a4
| 4fd22b56 | Sven Schöling | package SL::DB::Buchungsgruppe;
|
||
use strict;
|
||||
use SL::DB::MetaSetup::Buchungsgruppe;
|
||||
| 7b129753 | Moritz Bunkus | use SL::DB::Manager::Buchungsgruppe;
|
||
| 4fd22b56 | Sven Schöling | |||
| 7ed8903a | Sven Schöling | sub income_accno_id {
|
||
my ($self, $taxzone) = @_;
|
||||
my $taxzone_id = ref $taxzone && $taxzone->isa('SL::DB::TaxZone') ? $taxzone->id : $taxzone;
|
||||
my $method = 'income_accno_id_' . $taxzone_id;
|
||||
return $self->$method;
|
||||
}
|
||||
sub expense_accno_id {
|
||||
my ($self, $taxzone) = @_;
|
||||
my $taxzone_id = ref $taxzone && $taxzone->isa('SL::DB::TaxZone') ? $taxzone->id : $taxzone;
|
||||
my $method = 'expense_accno_id_' . $taxzone_id;
|
||||
return $self->$method;
|
||||
}
|
||||
| 4fd22b56 | Sven Schöling | 1;
|