@@ -, +, @@ items" option and add "Removes non-local records" option for existing functionality --- koha-tmpl/intranet-tmpl/prog/en/modules/tools/export.tt | 6 +++++- tools/export.pl | 5 ++++- 2 files changed, 9 insertions(+), 2 deletions(-) --- a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/export.tt +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/export.tt @@ -151,7 +151,11 @@ $(document).ready(function() {
  • - + + +
  • +
  • +
  • --- a/tools/export.pl +++ a/tools/export.pl @@ -87,13 +87,15 @@ if ( $op eq "export" ) { my $export_remove_fields = $query->param("export_remove_fields") || q||; my @biblionumbers = $query->multi_param("biblionumbers"); my @itemnumbers = $query->multi_param("itemnumbers"); + my $strip_nonlocal_records = $query->param('strip_nonlocal_records'); my $strip_nonlocal_items = $query->param('strip_nonlocal_items'); my @sql_params; my $sql_query; - my $libraries = $strip_nonlocal_items + my $libraries = $strip_nonlocal_records ? [ Koha::Libraries->find(C4::Context->userenv->{branch})->unblessed ] : Koha::Libraries->search_filtered->unblessed; + my $only_export_items_for_branch = $strip_nonlocal_items ? Koha::Libraries->find(C4::Context->userenv->{branch})->branchcode : undef; my @branchcodes; for my $branchcode ( @branch ) { if ( grep { $_->{branchcode} eq $branchcode } @$libraries ) { @@ -209,6 +211,7 @@ if ( $op eq "export" ) { dont_export_fields => $export_remove_fields, csv_profile_id => $csv_profile_id, export_items => (not $dont_export_items), + only_export_items_for_branch => $only_export_items_for_branch, } ); } --