Attachment 146004 Details for Bug 25508 – Bug 25503: Add option to export items bundle contents in checkouts table

[patch] Bug 25503: Add option to export items bundle contents in checkouts table

Bug-25503-Add-option-to-export-items-bundle-conten.patch (text/plain), 3.79 KB, created by Martin Renvoize (ashimema) on 2023-02-02 14:14:37 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Martin Renvoize (ashimema)

Created: 2023-02-02 14:14:37 UTC

Size: 3.79 KB

patch

obsolete

>From 75fcd3c23c48d89e5054e88ef166cf757338bc97 Mon Sep 17 00:00:00 2001
>From: Julian Maurice <julian.maurice@biblibre.com>
>Date: Thu, 14 May 2020 11:56:23 +0200
>Subject: [PATCH] Bug 25503: Add option to export items bundle contents in
> checkouts table
>
>Test plan:
>1. Enable system preference ExportCircHistory
>2. Create an item bundle (see bug 28854 comment 458)
>3. Check out the item bundle
>4. In the checkouts table, check the box in column "Export",
>   choose export format 'MARC with items', check "Export items bundle
>   contents" and click on "Export" button
>   The exported file should contain the biblio and item created at step
>   2, but also the biblio and items that are part of the bundle
>
>Signed-off-by: Marie-Luce <marie-luce.laflamme@inlibro.com>
>Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
>Signed-off-by: Marie-Luce <marie-luce.laflamme@inlibro.com>
>Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
>
>https://bugs.koha-community.org/show_bug.cgi?id=25508
>---
> .../prog/en/includes/checkouts-table.inc         |  3 ++-
> tools/export.pl                                  | 16 ++++++++++++++++
> 2 files changed, 18 insertions(+), 1 deletion(-)
>
>diff --git a/koha-tmpl/intranet-tmpl/prog/en/includes/checkouts-table.inc b/koha-tmpl/intranet-tmpl/prog/en/includes/checkouts-table.inc
>index 93df6e47306..8df4d2af7cf 100644
>--- a/koha-tmpl/intranet-tmpl/prog/en/includes/checkouts-table.inc
>+++ b/koha-tmpl/intranet-tmpl/prog/en/includes/checkouts-table.inc
>@@ -78,7 +78,8 @@
>                                 [% END %]
>                             </select>
>                         [% END %]
>-                       <label for="export_remove_fields">Don't export fields:</label> <input type="text" id="export_remove_fields" name="export_remove_fields" value="[% Koha.Preference('ExportRemoveFields') | html %]" title="Use for MARC exports" />
>+                        <label for="export_items_bundle_contents">Export items bundle contents</label> <input type="checkbox" name="export_items_bundle_contents" id="export_items_bundle_contents">
>+                        <label for="export_remove_fields">Don't export fields:</label> <input type="text" id="export_remove_fields" name="export_remove_fields" value="[% Koha.Preference('ExportRemoveFields') | html %]" title="Use for MARC exports" />
>                         <input type="hidden" name="op" value="export" />
>                         <input type="hidden" id="output_format" name="output_format" value="iso2709" />
>                         <input type="hidden" id="dont_export_item" name="dont_export_item" value="0" />
>diff --git a/tools/export.pl b/tools/export.pl
>index 345158eedd0..3fc79d7a5cc 100755
>--- a/tools/export.pl
>+++ b/tools/export.pl
>@@ -196,6 +196,22 @@ if ( $op eq "export" ) {
>             @record_ids = grep $record_ids{$_}, @filter_record_ids;
>         }
> 
>+        my $export_items_bundle_contents = $query->param('export_items_bundle_contents');
>+        if ($export_items_bundle_contents and $record_type eq 'bibs') {
>+            my $schema = Koha::Database->new->schema;
>+            my $items_bundle_rs = $schema->resultset('ItemBundle');
>+            foreach my $itemnumber (@itemnumbers) {
>+                my @item_bundle_items = $items_bundle_rs->search({ host => $itemnumber });
>+                foreach my $item_bundle_item (@item_bundle_items) {
>+                    my $biblionumber = $item_bundle_item->item->get_column('biblionumber');
>+                    my $itemnumber = $item_bundle_item->get_column('item');
>+                    push @record_ids, $biblionumber;
>+                    push @itemnumbers, $itemnumber;
>+                }
>+            }
>+            @record_ids = uniq @record_ids;
>+        }
>+
>         print CGI->new->header(
>             -type       => 'application/octet-stream',
>             -charset    => 'utf-8',
>-- 
>2.30.2

Actions: View | Diff | Splinter Review

Attachments on bug 25508: 118765 | 118776 | 118777 | 118778 | 119191 | 119192 | 119213 | 119214 | 119639 | 119640 | 119641 | 119702 | 146001 | 146002 | 146003 | 146004