Revision f8c31b75
Von Kivitendo Admin vor 8 Monaten hinzugefügt
bin/mozilla/is.pl | ||
---|---|---|
258 | 258 |
$form->{"memo_$i"} = $form->{acc_trans}{$key}->[$i - 1]->{memo}; |
259 | 259 |
|
260 | 260 |
$form->{paidaccounts} = $i; |
261 |
# hook for calc of of fx_paid and check if banktransaction has a record exchangerate
|
|
261 |
# hook for calc of of defaultcurrency_paid and check if banktransaction has a record exchangerate
|
|
262 | 262 |
if ($form->{"exchangerate_$i"}) { |
263 | 263 |
my $bt_acc_trans = SL::DB::Manager::BankTransactionAccTrans->find_by(acc_trans_id => $form->{"acc_trans_id_$i"}); |
264 | 264 |
if ($bt_acc_trans) { |
... | ... | |
268 | 268 |
$form->{"record_forex_$i"} = 1; |
269 | 269 |
} |
270 | 270 |
} |
271 |
$form->{"fx_paid_$i"} = $form->{"paid_$i"} / $form->{"exchangerate_$i"}; |
|
272 |
$form->{"fx_totalpaid"} += $form->{"fx_paid_$i"}; |
|
273 |
} # end hook fx_paid |
|
271 |
$form->{"defaultcurrency_paid_$i"} = $form->{"paid_$i"} * $form->{"exchangerate_$i"}; |
|
272 |
$form->{"defaultcurrency_totalpaid"} += $form->{"defaultcurrency_paid_$i"}; |
|
273 |
} # end hook defaultcurrency_paid |
|
274 |
|
|
274 | 275 |
} |
275 | 276 |
} else { |
276 | 277 |
$form->{$key} = "$form->{acc_trans}{$key}->[0]->{accno}--$form->{acc_trans}{$key}->[0]->{description}"; |
Auch abrufbar als: Unified diff
Verkaufsrechnungen - fx_paid -> defaultcurrency_paid
siehe Ticket #563, Währung und Fremdwährung war vertauscht.