summaryrefslogtreecommitdiff
path: root/LedgerSMB
diff options
context:
space:
mode:
Diffstat (limited to 'LedgerSMB')
-rw-r--r--LedgerSMB/DBObject/Company.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/LedgerSMB/DBObject/Company.pm b/LedgerSMB/DBObject/Company.pm
index a0cce914..4d11d858 100644
--- a/LedgerSMB/DBObject/Company.pm
+++ b/LedgerSMB/DBObject/Company.pm
@@ -137,6 +137,9 @@ $self->{cash_acc_list} = qw(list of cash accounts)
sub get_metadata {
my $self = shift @_;
+ @{$self->{entity_classes}} =
+ $self->exec_method(funcname => 'entity__list_classes');
+
@{$self->{ar_ap_acc_list}} =
$self->exec_method(funcname => 'chart_get_ar_ap');