X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fio.pl;h=de350c51345f7f3d711ea72af12225eefd85e36a;hb=8b5efb772c54921ce86998882177cf2f75d3d493;hp=314368d2c6080c93a97c48c17aafcd372aecadcb;hpb=e7127ad02437a6311dc646db8027c44ba19bd62c;p=kivitendo-erp.git diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl index 314368d2c..de350c513 100644 --- a/bin/mozilla/io.pl +++ b/bin/mozilla/io.pl @@ -33,6 +33,7 @@ # ####################################################################### +use SL::Common; use SL::CT; use SL::IC; use CGI::Ajax; @@ -367,9 +368,10 @@ sub display_row { qq||; if ($form->{"formel_$i"}) { - $column_data{qty} .= qq|| . - $cgi->hidden("-name" => "formel_$i", "-value" => $form->{"formel_$i"}) . $cgi->hidden("-name" => "alu_$i", "-value" => $form->{"alu_$i"}). qq||; + $column_data{qty} .= qq|| + . $cgi->hidden("-name" => "formel_$i", "-value" => $form->{"formel_$i"}) . $cgi->hidden("-name" => "alu_$i", "-value" => $form->{"alu_$i"}); } + $column_data{qty} .= qq||; $column_data{ship} = qq|{"subtotal_$i"}) ? "checked" : ""; print qq| - |.$locale->text('Subtotal').qq|  + |.$locale->text('Subtotal').qq|  |; if ($form->{"id_$i"} && $is_sales) { @@ -869,12 +871,11 @@ sub new_item { . $locale->text('Part') . qq|
 | . $locale->text('Service'); -print $cgi->hidden("-name" => "previousform", "-value" => $previousform); -map({ print($cgi->hidden("-name" => $_, "-value" => $form->{$_})); } - qw(rowcount vc login password)); - map({ print($cgi->hidden("-name" => $_, "-value" => $form->{"$__$i"})); } - ("partnumber", "description")); -print $cgi->hidden("-name" => "taxaccount2", "-value" => $form->{taxaccounts}); + + print $cgi->hidden("-name" => "previousform", "-value" => $previousform); + map { print $cgi->hidden("-name" => $_, "-value" => $form->{$_}); } qw(rowcount vc login password); + map { print $cgi->hidden("-name" => $_, "-value" => $form->{"${_}_$i"}); } qw(partnumber description unit sellprice); + print $cgi->hidden("-name" => "taxaccount2", "-value" => $form->{taxaccounts}); print qq| @@ -1319,8 +1320,7 @@ sub edit_e_mail { $form->{"email"} = $form->{"cp_email"}; } - $form->{ $form->{vc} } =~ /--/; - $title = $locale->text('E-mail') . " $`"; + $title = $locale->text('E-mail') . " " . $form->get_formname_translation(); $form->{oldmedia} = $form->{media}; $form->{media} = "email"; @@ -1354,6 +1354,8 @@ sub send_email { print_form("return"); + Common->save_email_status(\%myconfig, $form); + $form->{callback} = $callback; $form->redirect(); @@ -1447,7 +1449,7 @@ sub print_options { opthash("opendocument", $form->{DF}{opendocument}, $locale->text("OpenDocument/OASIS")) : undef; push @LANGUAGE_ID, - map { opthash($_->{id}, ($_->{id} eq $form->{language} ? 'selected' : ''), $_->{description}) } +{}, @{ $form->{languages} } + map { opthash($_->{id}, ($_->{id} eq $form->{language_id} ? 'selected' : ''), $_->{description}) } +{}, @{ $form->{languages} } if (ref $form->{languages} eq 'ARRAY'); push @PRINTER_ID, @@ -1538,7 +1540,7 @@ sub print_form { $inv = "ord"; $due = "req"; $form->{"${inv}date"} = $form->{transdate}; - $form->{label} = $locale->text('Sales Order'); + $form->{label} = $locale->text('Confirmation'); $numberfld = "sonumber"; $order = 1; } @@ -1620,7 +1622,7 @@ sub print_form { $inv = "quo"; $due = "req"; $form->{"${inv}date"} = $form->{transdate}; - $form->{label} = $locale->text('Quotation'); + $form->{label} = $locale->text('RFQ'); $numberfld = "rfqnumber"; $order = 1; }