X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fwh.pl;h=3857672e30f054c9f9cbe9a38cfc8982847ba300;hb=a4551dbafb54620a87faedac6b0970ca9cb78979;hp=3b732bceddb7a7d19b7743158d282e4c6f03573f;hpb=f2d34a8eb90b47e323c67c5da186b131254e85a6;p=kivitendo-erp.git diff --git a/bin/mozilla/wh.pl b/bin/mozilla/wh.pl index 3b732bced..3857672e3 100644 --- a/bin/mozilla/wh.pl +++ b/bin/mozilla/wh.pl @@ -277,7 +277,7 @@ sub transfer_parts { if (!scalar @transfers) { $form->show_generic_information($locale->text('Nothing has been selected for transfer.')); - exit 0; + ::end_of_request(); } WH->transfer(@transfers); @@ -503,7 +503,7 @@ sub transfer_stock { WH->transfer($transfer); - delete @{$form}{qw(parts_id partnumber description qty unit chargenumber bestbefore comment)}; + delete @{$form}{qw(parts_id partnumber description qty unit chargenumber bestbefore comment ean)}; $form->{saved_message} = $locale->text('The parts have been stocked.'); $form->{trans_type} = 'stock'; @@ -611,7 +611,7 @@ sub remove_parts { if (!scalar @transfers) { $form->show_generic_information($locale->text('Nothing has been selected for removal.')); - exit 0; + ::end_of_request(); } WH->transfer(@transfers); @@ -635,7 +635,9 @@ sub journal { my $form = $main::form; my %myconfig = %main::myconfig; + my $locale = $main::locale; + $form->{title} = $locale->text('Report about warehouse transactions'); $form->get_lists('warehouses' => { 'key' => 'WAREHOUSES', 'bins' => 'BINS', }); @@ -790,7 +792,7 @@ sub report { # $form->{fokus} = "partnumber"; # $form->{onload} .= "focus();"; - $form->{title} = $locale->text("Report about wareouse contents"); + $form->{title} = $locale->text("Report about warehouse contents"); $form->header(); print $form->parse_html_template("wh/report_filter", @@ -810,7 +812,7 @@ sub generate_report { my %myconfig = %main::myconfig; my $locale = $main::locale; - $form->{title} = $locale->text("Report about wareouse contents"); + $form->{title} = $locale->text("Report about warehouse contents"); $form->{sort} ||= 'partnumber'; my $sort_col = $form->{sort};