X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/694ced449e7ba97d19119d6a03080f8c5d0f3e04..be6f6cfd8dc7def5356edd0c5aacb814b4baded1:/bin/mozilla/ca.pl
diff --git a/bin/mozilla/ca.pl b/bin/mozilla/ca.pl
index 31c77da10..dd157e0a9 100644
--- a/bin/mozilla/ca.pl
+++ b/bin/mozilla/ca.pl
@@ -84,7 +84,7 @@ sub chart_of_accounts {
$form->{title} = $locale->text('Chart of Accounts');
- if ($main::eur) {
+ if ($::lx_office_conf{system}->{eur}) {
$form->{method} = "cash";
}
@@ -177,8 +177,8 @@ sub list {
|
| if $form->{selectdepartment};
- my $accrual = ($main::eur) ? "" : "checked";
- my $cash = ($main::eur) ? "checked" : "";
+ my $accrual = $::lx_office_conf{system}->{eur} ? "" : "checked";
+ my $cash = $::lx_office_conf{system}->{eur} ? "checked" : "";
my $name_1 = "fromdate";
my $id_1 = "fromdate";
@@ -246,6 +246,8 @@ sub list {
$form->{description} =~ s/\"/"/g;
+ my $eur = $::lx_office_conf{system}->{eur};
+
print qq|
@@ -254,7 +256,7 @@ sub list {
{accno}>
-
+
{accounttype}>