X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Freportgenerator.pl;h=f2eb1ef1dcf75b664ed4339efb808d5a306c4c8e;hb=0b36b2259c1300ee5360a9c8d5aee1f321abd364;hp=2304e492d85ffb33edeebe4dc0fe8c2667239dee;hpb=fd2e0902abd98a3bea5166bf7fafd04fd7039f97;p=kivitendo-erp.git diff --git a/bin/mozilla/reportgenerator.pl b/bin/mozilla/reportgenerator.pl index 2304e492d..f2eb1ef1d 100644 --- a/bin/mozilla/reportgenerator.pl +++ b/bin/mozilla/reportgenerator.pl @@ -34,6 +34,30 @@ sub report_generator_set_default_sort { } +sub report_generator_setup_action_bar { + my ($type, %params) = @_; + + for my $bar ($::request->layout->get('actionbar')) { + $bar->add( + combobox => [ + action => [ + $type eq 'pdf' ? $::locale->text('PDF export') : $::locale->text('CSV export'), + submit => [ '#report_generator_form', { 'report_generator_dispatch_to' => "report_generator_export_as_${type}" } ], + ], + action => [ + $::locale->text('PDF export with attachments'), + submit => [ '#report_generator_form', { report_generator_dispatch_to => "report_generator_export_as_pdf", report_generator_addattachments => 1 } ], + only_if => $params{allow_attachments}, + ], + ], + action => [ + $::locale->text('Back'), + submit => [ '#report_generator_form', { 'report_generator_dispatch_to' => "report_generator_back" } ], + ], + ); + } +} + sub report_generator_export_as_pdf { $main::lxdebug->enter_sub(); @@ -64,15 +88,15 @@ sub report_generator_export_as_pdf { $form->{copies} = max $myconfig{copies} * 1, 1; my $allow_font_selection = 1; - my $allow_attachments = 0; eval { require PDF::API2; }; $allow_font_selection = 0 if ($@); - $allow_attachments = 1 if $form->{report_generator_hidden_l_attachments}; $form->{title} = $locale->text('PDF export -- options'); + + report_generator_setup_action_bar('pdf', allow_attachments => !!$form->{report_generator_hidden_l_attachments}); + $form->header(); print $form->parse_html_template('report_generator/pdf_export_options', { 'HIDDEN' => \@form_values, - 'ALLOW_ATTACHMENTS' => $allow_attachments, 'ALLOW_FONT_SELECTION' => $allow_font_selection, }); $main::lxdebug->leave_sub(); @@ -93,6 +117,9 @@ sub report_generator_export_as_csv { my @form_values = $form->flatten_variables(grep { ($_ ne 'login') && ($_ ne 'password') } keys %{ $form }); $form->{title} = $locale->text('CSV export -- options'); + + report_generator_setup_action_bar('csv'); + $form->header(); print $form->parse_html_template('report_generator/csv_export_options', { 'HIDDEN' => \@form_values });