SL/DB/Buchungsgruppe.pm

   1 # This file has been auto-generated only because it didn't exist.
   2 # Feel free to modify it at will; it will not be overwritten automatically.
   3
   4 package SL::DB::Buchungsgruppe;
   5
   6 use strict;
   7
   8 use SL::DB::MetaSetup::Buchungsgruppe;
   9
  10 # Creates get_all, get_all_count, get_all_iterator, delete_all and update_all.
  11 __PACKAGE__->meta->make_manager_class;
  12
  13 sub income_accno_id {
  14   my ($self, $taxzone) = @_;
  15   my $taxzone_id = ref $taxzone && $taxzone->isa('SL::DB::TaxZone') ? $taxzone->id : $taxzone;
  16   my $method = 'income_accno_id_' . $taxzone_id;
  17
  18   return $self->$method;
  19 }
  20
  21 sub expense_accno_id {
  22   my ($self, $taxzone) = @_;
  23   my $taxzone_id = ref $taxzone && $taxzone->isa('SL::DB::TaxZone') ? $taxzone->id : $taxzone;
  24   my $method = 'expense_accno_id_' . $taxzone_id;
  25
  26   return $self->$method;
  27 }
  28
  29 1;