projects
/
kivitendo-erp.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
3e5dbd2
)
accessoren für income/expense_accno_id, die die postfix Indizes abstrahieren.
author
Sven Schöling
<s.schoeling@linet-services.de>
Thu, 21 Oct 2010 09:34:45 +0000
(11:34 +0200)
committer
Sven Schöling
<s.schoeling@linet-services.de>
Thu, 21 Oct 2010 14:21:13 +0000
(16:21 +0200)
SL/DB/Buchungsgruppe.pm
patch
|
blob
|
history
diff --git
a/SL/DB/Buchungsgruppe.pm
b/SL/DB/Buchungsgruppe.pm
index
2dffaa5
..
26f446b
100644
(file)
--- a/
SL/DB/Buchungsgruppe.pm
+++ b/
SL/DB/Buchungsgruppe.pm
@@
-10,4
+10,20
@@
use SL::DB::MetaSetup::Buchungsgruppe;
# Creates get_all, get_all_count, get_all_iterator, delete_all and update_all.
__PACKAGE__->meta->make_manager_class;
# 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;
1;