Revision 40a94352
Von Jan Büren vor fast 2 Jahren hinzugefügt
bin/mozilla/ar.pl | ||
---|---|---|
385 | 385 |
? ($form->current_date(\%myconfig) eq $form->{gldate}) |
386 | 386 |
: ($::instance_conf->get_ar_changeable == 1); |
387 | 387 |
$readonly = ($form->{radier}) ? "" : $readonly; |
388 |
$form->{defaultcurrency} = $form->get_default_currency(\%myconfig); |
|
389 |
if ($form->{currency} ne $form->{defaultcurrency}) { |
|
390 |
($form->{exchangerate}, $form->{record_forex}) = $form->check_exchangerate(\%myconfig, $form->{currency}, $form->{transdate}, "buy", $form->{id}, 'ar'); |
|
391 |
} |
|
388 | 392 |
|
389 |
$form->{forex} = $form->check_exchangerate( \%myconfig, $form->{currency}, $form->{transdate}, 'buy'); |
|
390 |
$form->{exchangerate} = $form->{forex} if $form->{forex}; |
|
391 | 393 |
|
392 | 394 |
$rows = max 2, $form->numtextrows($form->{notes}, 50); |
393 | 395 |
|
Auch abrufbar als: Unified diff
Wechselkurs beim Laden des Belegs in form_header oder retrieve_invoice holen