Revision 43f9b1c5
Von G. Richardson vor mehr als 13 Jahren hinzugefügt
bin/mozilla/ca.pl | ||
---|---|---|
84 | 84 |
|
85 | 85 |
$form->{title} = $locale->text('Chart of Accounts'); |
86 | 86 |
|
87 |
if ($::lx_office_conf{system}->{eur}) { |
|
87 |
if ( $::instance_conf->get_accounting_method eq 'cash' ) { |
|
88 |
# $form->{method} can probably be made redundant now that we have get_accounting_method |
|
88 | 89 |
$form->{method} = "cash"; |
89 | 90 |
} |
90 | 91 |
|
... | ... | |
177 | 178 |
<td colspan=3><select name=department>$form->{selectdepartment}</select></td> |
178 | 179 |
</tr> |
179 | 180 |
| if $form->{selectdepartment}; |
180 |
my $accrual = $::lx_office_conf{system}->{eur} ? "" : "checked";
|
|
181 |
my $cash = $::lx_office_conf{system}->{eur} ? "checked" : "";
|
|
181 |
my $accrual = $::instance_conf->get_accounting_method eq 'cash' ? "" : "checked";
|
|
182 |
my $cash = $::instance_conf->get_accounting_method eq 'cash' ? "checked" : "";
|
|
182 | 183 |
|
183 | 184 |
my $name_1 = "fromdate"; |
184 | 185 |
my $id_1 = "fromdate"; |
... | ... | |
246 | 247 |
|
247 | 248 |
$form->{description} =~ s/\"/"/g; |
248 | 249 |
|
249 |
my $eur = $::lx_office_conf{system}->{eur};
|
|
250 |
my $eur = $::instance_conf->get_accounting_method eq 'cash' ? 1 : 0;
|
|
250 | 251 |
|
251 | 252 |
print qq| |
252 | 253 |
<body onLoad="$onload"> |
Auch abrufbar als: Unified diff
Umstellung von eur zu 3 Variablen in defaults
accounting_method inventory_system profit_determination
Details siehe doc/umstellung_eur.txt