Revision 7ed8903a
Von Sven Schöling vor mehr als 14 Jahren hinzugefügt
| SL/DB/Buchungsgruppe.pm | ||
|---|---|---|
|
# Creates get_all, get_all_count, get_all_iterator, delete_all and update_all.
|
||
|
__PACKAGE__->meta->make_manager_class;
|
||
|
|
||
|
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;
|
||
|
}
|
||
|
|
||
|
1;
|
||
Auch abrufbar als: Unified diff
accessoren für income/expense_accno_id, die die postfix Indizes abstrahieren.