From: Peter Schulgin Date: Wed, 8 Jan 2014 14:02:59 +0000 (+0100) Subject: Keine zwischenabfrage nach Wechselkurs im Workflow Auftrag->Rechnung X-Git-Tag: release-3.1.0beta1~22^2~22^2~6 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=bc5c9dac50b13fd17e7ec567179c4dfb6acf3a02;p=kivitendo-erp.git Keine zwischenabfrage nach Wechselkurs im Workflow Auftrag->Rechnung Behebt #2141 Komplette Funktion "backorder_exchangerate" entfernt. Die eingabe des Wechselkursere wird druch setzten auf "0" erzwungen --- diff --git a/bin/mozilla/oe.pl b/bin/mozilla/oe.pl index b6c22624c..bdc5275f3 100644 --- a/bin/mozilla/oe.pl +++ b/bin/mozilla/oe.pl @@ -1355,8 +1355,7 @@ sub invoice { $exchangerate = $form->check_exchangerate(\%myconfig, $form->{currency}, $orddate, $buysell); if (!$exchangerate) { - &backorder_exchangerate($orddate, $buysell); - ::end_of_request(); + $exchangerate = 0; } } @@ -1447,75 +1446,6 @@ sub invoice { $main::lxdebug->leave_sub(); } -sub backorder_exchangerate { - $main::lxdebug->enter_sub(); - - my $form = $main::form; - my $locale = $main::locale; - - check_oe_access(); - - my ($orddate, $buysell) = @_; - - $form->header; - - print qq| -
{script}> -|; - - # delete action variable - map { delete $form->{$_} } qw(action header exchangerate); - - foreach my $key (keys %$form) { - next if (($key eq 'login') || ($key eq 'password') || ('' ne ref $form->{$key})); - $form->{$key} =~ s/\"/"/g; - print qq|\n|; - } - - $form->{title} = $locale->text('Add Exchangerate'); - - print qq| - - - - - - - - - - -
$form->{title}
- - - - - - - - - - - - - -
| . $locale->text('Currency') . qq|$form->{currency}
| . $locale->text('Date') . qq|$orddate
| . $locale->text('Exchangerate') . qq|
-
- -
- -
- - - - -
-|; - - $main::lxdebug->leave_sub(); -} - sub save_exchangerate { $main::lxdebug->enter_sub();