Revision 598383b3
Von Bernd Bleßmann vor mehr als 4 Jahren hinzugefügt
| bin/mozilla/io.pl | ||
|---|---|---|
| 56 | 56 |
use SL::Presenter::Part; |
| 57 | 57 |
|
| 58 | 58 |
use SL::DB::Contact; |
| 59 |
use SL::DB::Currency; |
|
| 59 | 60 |
use SL::DB::Customer; |
| 60 | 61 |
use SL::DB::Default; |
| 61 | 62 |
use SL::DB::Language; |
| ... | ... | |
| 910 | 911 |
_order(); |
| 911 | 912 |
|
| 912 | 913 |
if ($::instance_conf->get_feature_experimental_order) {
|
| 914 |
|
|
| 915 |
# At this point, the record is saved and the exchangerate contains |
|
| 916 |
# an unformatted value. _make_record uses RDBO attributes (i.e. _as_number) |
|
| 917 |
# to assign values and thus expects an formatted value. |
|
| 918 |
$::form->{exchangerate} = $::form->format_amount(\%::myconfig, $::form->{exchangerate});
|
|
| 919 |
|
|
| 913 | 920 |
my $order = _make_record(); |
| 914 |
$order->globalproject_id(undef) if !$order->globalproject_id; |
|
| 915 |
$order->payment_id(undef) if !$order->payment_id; |
|
| 921 |
|
|
| 922 |
$order->currency(SL::DB::Currency->new(name => $::form->{currency})->load) if $::form->{currency};
|
|
| 923 |
$order->globalproject_id(undef) if !$order->globalproject_id; |
|
| 924 |
$order->payment_id(undef) if !$order->payment_id; |
|
| 925 |
|
|
| 916 | 926 |
my $row = 1; |
| 917 | 927 |
foreach my $item (@{$order->items_sorted}) {
|
| 918 | 928 |
$item->custom_variables([]); |
Auch abrufbar als: Unified diff
Auftrags-Controller: Wechselkurs pro Beleg …
- Wechselkurs wird pro Beleg gespeichert
- Wechselkurs ist immer änderbar
- vorausgefüllt aus "alter" Tages-Wechselkurstabelle
Bezieht sich auch auf #135
Refs #135