X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/8084ef359515031ec8429b49baf0ab09858f55d2..8add0ccd27ab0ff17256b74dccd1f761c0d09182:/SL/OE.pm diff --git a/SL/OE.pm b/SL/OE.pm index 61360996b..5bf2a3da9 100644 --- a/SL/OE.pm +++ b/SL/OE.pm @@ -806,6 +806,9 @@ sub retrieve { if ($ref) { map { $form->{$_} = $ref->{$_} } keys %$ref; + # remove any trailing whitespace + $form->{currency} =~ s/\s*$//; + $form->{saved_xyznumber} = $form->{$form->{type} =~ /_quotation$/ ? "quonumber" : "ordnumber"}; # set all entries for multiple ids blank that yield different information