X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Foe.pl;h=cb55f0714f7fb776811dafe350bb61293ee8cdea;hb=29d636435456494e8dc702ccc1015452a71275d9;hp=39b99584080561a5a239f9e5aca6915530be75a0;hpb=609065d23ee1ba529ba0ebfb5a2146b79775e9ea;p=kivitendo-erp.git diff --git a/bin/mozilla/oe.pl b/bin/mozilla/oe.pl index 39b995840..cb55f0714 100644 --- a/bin/mozilla/oe.pl +++ b/bin/mozilla/oe.pl @@ -1012,6 +1012,10 @@ sub form_footer { +|; + + if ($form->{type} =~ /^sales_/) { + print qq| @@ -1020,6 +1024,10 @@ sub form_footer { +|; + } + + print qq|
| . $locale->text('Ertrag') . qq| | . $form->format_amount(\%myconfig, $form->{marge_total}, 2, 0) . qq|| . $locale->text('Ertrag prozentual') . qq| | . $form->format_amount(\%myconfig, $form->{marge_percent}, 2, 0) . qq| %
@@ -1056,11 +1064,11 @@ sub form_footer { Dateiname Webdavlink |; - foreach $file (keys %{ $form->{WEBDAV} }) { + foreach $file (@{ $form->{WEBDAV} }) { $webdav_list .= qq| - $file - $form->{WEBDAV}{$file} + $file->{name} + $file->{type} |; } @@ -1124,12 +1132,10 @@ sub form_footer { |; } - if (1) { print qq| |; -} if ($form->{type} =~ /sales_order$/) { print qq| @@ -1529,7 +1535,6 @@ sub search { $employee | . $locale->text('Ship via') . qq| - $employee | @@ -2078,8 +2083,8 @@ sub delete { - + @@ -2172,7 +2177,6 @@ sub invoice { $exchangerate = $form->check_exchangerate(\%myconfig, $form->{currency}, $orddate, $buysell); - print(STDERR "CURRENCY $form->{currency} DEFAULT: $form->{defaultcurrency} EXCHANGE $exchangerate\n"); if (!$exchangerate) { &backorder_exchangerate($orddate, $buysell); @@ -2602,18 +2606,16 @@ sub e_mail { $form->{print_and_save} = 1; - if (!$form->{id}) { - $print_post = 1; + $print_post = 1; - my $saved_form = save_form(); + my $saved_form = save_form(); - save(); + save(); - my %saved_vars; - map({ $saved_vars{$_} = $form->{$_}; } qw(id ordnumber quonumber)); - restore_form($saved_form); - map({ $form->{$_} = $saved_vars{$_}; } qw(id ordnumber quonumber)); - } + my %saved_vars; + map({ $saved_vars{$_} = $form->{$_}; } qw(id ordnumber quonumber)); + restore_form($saved_form); + map({ $form->{$_} = $saved_vars{$_}; } qw(id ordnumber quonumber)); edit_e_mail();