Revision 94802c79
Von Bernd Blessmann vor fast 13 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 2890 | 2890 |
"a.department_id" => "department_id", |
| 2891 | 2891 |
"d.description" => "department", |
| 2892 | 2892 |
"ct.name" => $table, |
| 2893 |
"ct.curr" => "cv_curr", |
|
| 2893 | 2894 |
"current_date + ct.terms" => "duedate", |
| 2894 | 2895 |
); |
| 2895 | 2896 |
|
| 2896 | 2897 |
if ($self->{type} =~ /delivery_order/) {
|
| 2897 | 2898 |
$arap = 'delivery_orders'; |
| 2898 | 2899 |
delete $column_map{"a.curr"};
|
| 2900 |
delete $column_map{"ct.curr"};
|
|
| 2899 | 2901 |
|
| 2900 | 2902 |
} elsif ($self->{type} =~ /_order/) {
|
| 2901 | 2903 |
$arap = 'oe'; |
| ... | ... | |
| 2931 | 2933 |
|
| 2932 | 2934 |
# remove any trailing whitespace |
| 2933 | 2935 |
$self->{currency} =~ s/\s*$// if $self->{currency};
|
| 2936 |
$self->{cv_curr} =~ s/\s*$// if $self->{cv_curr};
|
|
| 2937 |
|
|
| 2938 |
# if customer/vendor currency is set use this |
|
| 2939 |
$self->{currency} = $self->{cv_curr} if $self->{cv_curr};
|
|
| 2934 | 2940 |
|
| 2935 | 2941 |
$main::lxdebug->leave_sub(); |
| 2936 | 2942 |
} |
Auch abrufbar als: Unified diff
Fix für Bug 1759: (Verbesserung) Währung bei Kunden / Lieferanten vorbelegen
Für Kunden und Lieferanten kann jetzt in den Stammdaten eine Währung
eingestellt werden, die als Voreinstellung in den Ver- und Einkaufs-
Masken dient.