X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=bin%2Fmozilla%2Fcommon.pl;h=e05a146df5ab2d71835c781a43907c9245854d5c;hb=723b79bdf889207b36f5ab0edcfd4a6d81c6f8b6;hp=473acfffc4c3b24b6847b7484461a1f1619364d5;hpb=5cf977e52788c523150fa19225b90914e6ddc909;p=kivitendo-erp.git diff --git a/bin/mozilla/common.pl b/bin/mozilla/common.pl index 473acfffc..e05a146df 100644 --- a/bin/mozilla/common.pl +++ b/bin/mozilla/common.pl @@ -14,7 +14,7 @@ use SL::Common; use SL::MoreCommon; sub build_std_url { - $lxdebug->enter_sub(); + $lxdebug->enter_sub(2); my $script = $form->{script}; @@ -37,7 +37,7 @@ sub build_std_url { my $url = "${script}?" . join('&', @parts); - $lxdebug->leave_sub(); + $lxdebug->leave_sub(2); return $url; } @@ -307,9 +307,9 @@ sub delivery_customer_selection { $form->{"title"} = $locale->text("Select a Customer"); $form->header(); - print($form->parse_html_template("generic/select_delivery_customer", { "HEADER" => \@header, - "DELIVERY" => $delivery, - "onload" => $onload })); + print $form->parse_html_template2("generic/select_delivery_customer", { "HEADER" => \@header, + "DELIVERY" => $delivery, + "onload" => $onload }); $lxdebug->leave_sub(); } @@ -349,9 +349,9 @@ sub vendor_selection { $form->{"title"} = $locale->text("Select a Customer"); $form->header(); - print($form->parse_html_template("generic/select_vendor", { "HEADER" => \@header, - "VENDOR" => $vendor, - "onload" => $onload })); + print $form->parse_html_template2("generic/select_vendor", { "HEADER" => \@header, + "VENDOR" => $vendor, + "onload" => $onload }); $lxdebug->leave_sub(); } @@ -395,9 +395,9 @@ sub calculate_qty { $form->{formel} = $formel; $form->{"title"} = $locale->text("Please enter values"); $form->header(); - print($form->parse_html_template("generic/calculate_qty", { "HEADER" => \@header, - "VARIABLES" => \@variable, - "onload" => $onload })); + print($form->parse_html_template2("generic/calculate_qty", { "HEADER" => \@header, + "VARIABLES" => \@variable, + "onload" => $onload })); $lxdebug->leave_sub(); } @@ -405,14 +405,9 @@ sub calculate_qty { sub set_longdescription { $lxdebug->enter_sub(); - - my $callback = "$form->{script}?action=set_longdescription&"; - map({ $callback .= "$_=" . $form->escape($form->{$_}) . "&" } - (qw(login password name input_name input_id), grep({ /^[fl]_/ } keys %$form))); - - $form->{"title"} = $locale->text("Enter longdescription"); + $form->{title} = $locale->text("Enter longdescription"); $form->header(); - print($form->parse_html_template("generic/set_longdescription")); + print $form->parse_html_template2("generic/set_longdescription"); $lxdebug->leave_sub(); } @@ -514,7 +509,7 @@ sub show_history { $form->{title} = $locale->text("History"); $form->header(); - print $form->parse_html_template( "common/show_history", { + print $form->parse_html_template2( "common/show_history", { "DATEN" => $form->get_history($dbh,$form->{input_name},"",$form->{order}), "SUCCESS" => ($form->get_history($dbh,$form->{input_name}) ne "0"), uc($sort) => 1, @@ -559,8 +554,8 @@ sub show_vc_details { $form->{title} = $form->{vc} eq "customer" ? $locale->text("Customer details") : $locale->text("Vendor details"); $form->header(); - print($form->parse_html_template("common/show_vc_details", - { "is_customer" => $form->{vc} eq "customer" })); + print($form->parse_html_template2("common/show_vc_details", + { "is_customer" => $form->{vc} eq "customer" })); $lxdebug->leave_sub(); }