Merge branch 'master' of vc.linet-services.de:public/lx-office-erp

[mfinanz.git] / SL / InstanceConfiguration.pm

diff --git a/SL/InstanceConfiguration.pm b/SL/InstanceConfiguration.pm
index b8dbee6ca0d6173acd60cfa7b29a6f3943b6b770..24fd3be280aedb9596cf85f215620c7482f4dd92 100644 (file)
--- a/SL/InstanceConfiguration.pm
+++ b/SL/InstanceConfiguration.pm
@@ -34,6 +34,21 @@ sub get_currencies {
   return $self->{currencies} ? @{ $self->{currencies} } : ();
 }
 
+sub get_accounting_method {
+  my ($self) = @_;
+  return $self->{data}->{accounting_method};
+}
+
+sub get_inventory_system {
+  my ($self) = @_;
+  return $self->{data}->{inventory_system};
+}
+
+sub get_profit_determination {
+  my ($self) = @_;
+  return $self->{data}->{profit_determination};
+}
+
 1;
 
 __END__
@@ -49,7 +64,7 @@ SL::InstanceConfiguration - Provide instance-specific configuration data
 =head1 SYNOPSIS
 
 Lx-Office has two configuration levels: installation specific
-(provided by the global variable C<%::lxoffice_conf>) and instance
+(provided by the global variable C<%::lx_office_conf>) and instance
 specific. The latter is provided by a global instance of this class,
 C<$::instance_conf>.
 
@@ -74,6 +89,18 @@ Returns an array of configured currencies.
 Returns the default currency or undef if no currency has been
 configured.
 
+=item C<get_accounting_method>
+
+Returns the default accounting method, accrual or cash
+
+=item C<get_inventory_system>
+
+Returns the default inventory system, perpetual or periodic
+
+=item C<get_profit_determination>
+
+Returns the default profit determination method, balance or income
+
 =back
 
 =head1 BUGS