Revision 830af529
Von Kivitendo Admin vor etwa 1 Jahr hinzugefügt
| bin/mozilla/is.pl | ||
|---|---|---|
| 241 | 241 |
$form->{"memo_$i"} = $form->{acc_trans}{$key}->[$i - 1]->{memo};
|
| 242 | 242 |
|
| 243 | 243 |
$form->{paidaccounts} = $i;
|
| 244 |
# hook for calc of of fx_paid and check if banktransaction has a record exchangerate
|
|
| 244 |
# hook for calc of of defaultcurrency_paid and check if banktransaction has a record exchangerate
|
|
| 245 | 245 |
if ($form->{"exchangerate_$i"}) {
|
| 246 | 246 |
my $bt_acc_trans = SL::DB::Manager::BankTransactionAccTrans->find_by(acc_trans_id => $form->{"acc_trans_id_$i"});
|
| 247 | 247 |
if ($bt_acc_trans) {
|
| ... | ... | |
| 251 | 251 |
$form->{"record_forex_$i"} = 1;
|
| 252 | 252 |
} |
| 253 | 253 |
} |
| 254 |
$form->{"fx_paid_$i"} = $form->{"paid_$i"} / $form->{"exchangerate_$i"};
|
|
| 255 |
$form->{"fx_totalpaid"} += $form->{"fx_paid_$i"};
|
|
| 256 |
} # end hook fx_paid |
|
| 254 |
$form->{"defaultcurrency_paid_$i"} = $form->{"paid_$i"} * $form->{"exchangerate_$i"};
|
|
| 255 |
$form->{"defaultcurrency_totalpaid"} += $form->{"defaultcurrency_paid_$i"};
|
|
| 256 |
} # end hook defaultcurrency_paid |
|
| 257 |
|
|
| 257 | 258 |
} |
| 258 | 259 |
} else {
|
| 259 | 260 |
$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.