X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Foe.pl;h=6941424866cccd7dcb0f0fbcc21a70e9bf6a3e83;hb=ddc3bbb167d3010b0058efa8f90936d15be76c2e;hp=72093443d461219ce2ad7a5342b9d13794bff631;hpb=19be3a57dbffa4a66be9f1cffdf5fc2a18332567;p=kivitendo-erp.git diff --git a/bin/mozilla/oe.pl b/bin/mozilla/oe.pl index 72093443d..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}) { @@ -2165,8 +2170,7 @@ sub invoice { # if not it's most likely a collective order, which can't be saved back # so they just have to be closed if (($form->{ordnumber} ne '') || ($form->{quonumber} ne '')) { - relink_accounts(); - OE->save(\%myconfig, \%$form); + OE->close_order(\%myconfig, \%$form); } else { OE->close_orders(\%myconfig, \%$form); } @@ -2432,9 +2436,7 @@ sub purchase_order { if ( $form->{type} eq 'sales_quotation' || $form->{type} eq 'request_quotation') { - $form->{closed} = 1; - relink_accounts(); - OE->save(\%myconfig, \%$form); + OE->close_order(\%myconfig, \%$form); } $form->{cp_id} *= 1; @@ -2453,9 +2455,7 @@ sub sales_order { if ( $form->{type} eq 'sales_quotation' || $form->{type} eq 'request_quotation') { - $form->{closed} = 1; - relink_accounts(); - OE->save(\%myconfig, \%$form); + OE->close_order(\%myconfig, $form); } $form->{cp_id} *= 1;