X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=inline;f=bin%2Fmozilla%2Foe.pl;h=6941424866cccd7dcb0f0fbcc21a70e9bf6a3e83;hb=ddc3bbb167d3010b0058efa8f90936d15be76c2e;hp=89cb39cddf63cde23b48863767d857a755d45965;hpb=8fadc373a825676fbd47dec846e5a42194606d94;p=kivitendo-erp.git diff --git a/bin/mozilla/oe.pl b/bin/mozilla/oe.pl index 89cb39cdd..694142486 100644 --- a/bin/mozilla/oe.pl +++ b/bin/mozilla/oe.pl @@ -432,11 +432,12 @@ sub form_header { ""; } else { $form->{selectshipto} .= - ""; + ""; } } } else { + $form->{selectshipto} = $form->unquote($form->{selectshipto}); $form->{selectshipto} =~ s/ selected//g; if ($form->{shipto_id} ne "") { $form->{selectshipto} =~ s/value=$form->{shipto_id}/value=$form->{shipto_id} selected/; @@ -445,9 +446,9 @@ sub form_header { $shipto = qq| | . $locale->text('Shipping Address') . qq| - - |; - + |; + $form->{selectshipto} = $form->quote($form->{selectshipto}); + $shipto .= qq| |; @@ -493,13 +494,8 @@ sub form_header { $vclabel = ucfirst $form->{vc}; $vclabel = $locale->text($vclabel); - $terms = qq| - - | . $locale->text('Terms: Net') . qq| - {terms}> | - . $locale->text('days') . qq| - -|; + $terms = qq||; if ($form->{business}) { $business = qq| @@ -600,7 +596,7 @@ sub form_header { $form->{creditlimit} | . $locale->text('Remaining') . qq| - $form->{creditremaining} + $form->{creditremaining} @@ -1618,7 +1614,9 @@ sub orders { . qq||; $column_header{quonumber} = qq|| - . $locale->text('Quotation') + . ($form->{"type"} eq "request_quotation" ? + $locale->text('RFQ') : + $locale->text('Quotation')) . qq||; $column_header{name} = qq|$name|; @@ -2141,6 +2139,13 @@ sub invoice { $form->{cp_id} *= 1; + for $i (1 .. $form->{rowcount}) { + map({ $form->{"${_}_${i}"} = $form->parse_amount(\%myconfig, + $form->{"${_}_${i}"}) + if ($form->{"${_}_${i}"}) } + qw(ship qty sellprice listprice basefactor)); + } + if ( $form->{type} =~ /_order/ && $form->{currency} ne $form->{defaultcurrency}) { @@ -2230,13 +2235,6 @@ sub invoice { $form->{creditremaining} -= ($form->{oldinvtotal} - $form->{ordtotal}); - for $i (1 .. $form->{rowcount}) { - map({ $form->{"${_}_${i}"} = $form->parse_amount(\%myconfig, - $form->{"${_}_${i}"}) - if ($form->{"${_}_${i}"}) } - qw(ship qty sellprice listprice basefactor)); - } - &prepare_invoice; # format amounts