Attachment 151976 Details for Bug 33493 – Bug 33493: Add a filter relationship for branchtransfers

[patch] Bug 33493: Add a filter relationship for branchtransfers

Bug-33493-Add-a-filter-relationship-for-branchtran.patch (text/plain), 2.33 KB, created by Marcel de Rooy on 2023-06-02 09:13:17 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Marcel de Rooy

Created: 2023-06-02 09:13:17 UTC

Size: 2.33 KB

patch

obsolete

>From ec75ba1ca58c67a5bc09992ddce973189433fde1 Mon Sep 17 00:00:00 2001
>From: Nick Clemens <nick@bywatersolutions.com>
>Date: Fri, 10 Mar 2023 16:14:50 +0000
>Subject: [PATCH] Bug 33493: Add a filter relationship for branchtransfers
>Content-Type: text/plain; charset=utf-8
>
>Prefetching is useful, but we don't want to fetch all the inactive
>transfers for an item. This patch adds a filtered relationship and
>updates get_transfer(s) to use this
>
>To test:
>prove -v t/db_dependent/Koha/Item.t
>
>Signed-off-by: David Nind <david@davidnind.com>
>
>Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
>---
> Koha/Item.pm               | 11 +++++------
> Koha/Schema/Result/Item.pm | 10 ++++++++++
> 2 files changed, 15 insertions(+), 6 deletions(-)
>
>diff --git a/Koha/Item.pm b/Koha/Item.pm
>index ea2677a01f..d38265903f 100644
>--- a/Koha/Item.pm
>+++ b/Koha/Item.pm
>@@ -565,7 +565,9 @@ we still expect the item to end up at a final location eventually.
> sub get_transfer {
>     my ($self) = @_;
> 
>-    return $self->get_transfers->search( {}, { rows => 1 } )->next;
>+    my $transfer = $self->_result->branchtransfer;
>+
>+    return Koha::Item::Transfers->_new_from_dbic($transfer)->next;
> }
> 
> =head3 get_transfers
>@@ -588,12 +590,9 @@ we still expect the item to end up at a final location eventually.
> sub get_transfers {
>     my ($self) = @_;
> 
>-    my $transfer_rs = $self->_result->branchtransfers;
>+    my $transfer_rs = $self->_result->branchtransfer;
> 
>-    return Koha::Item::Transfers
>-                ->_new_from_dbic($transfer_rs)
>-                ->filter_by_current
>-                ->search( {}, { order_by => [ { -desc => 'datesent' }, { -asc => 'daterequested' } ], } );
>+    return Koha::Item::Transfers->_new_from_dbic($transfer_rs);
> }
> 
> =head3 last_returned_by
>diff --git a/Koha/Schema/Result/Item.pm b/Koha/Schema/Result/Item.pm
>index 308a63f804..72112d27d3 100644
>--- a/Koha/Schema/Result/Item.pm
>+++ b/Koha/Schema/Result/Item.pm
>@@ -972,6 +972,16 @@ __PACKAGE__->many_to_many(
>   "ordernumber",
> );
> 
>+__PACKAGE__->has_many(
>+  "branchtransfer",
>+  "Koha::Schema::Result::Branchtransfer",
>+  { 'foreign.itemnumber' => 'self.itemnumber' },
>+  {
>+      where => { datearrived => undef, datecancelled => undef },
>+      order_by => [ { -desc => 'datesent' }, { -asc => 'daterequested' } ]
>+  }
>+);
>+
> use C4::Context;
> sub effective_itemtype {
>     my ( $self ) = @_;
>-- 
>2.30.2

Actions: View | Diff | Splinter Review

Attachments on bug 33493: 149464 | 149469 | 151865 | 151923 | 151924 | 151976 | 151977 | 151978