View | Details | Raw Unified | Return to bug 16246
Collapse All | Expand All

(-)a/C4/ILSDI/Services.pm (-2 / +7 lines)
Lines 36-41 use C4::Auth; Link Here
36
use C4::Members::Attributes qw(GetBorrowerAttributes);
36
use C4::Members::Attributes qw(GetBorrowerAttributes);
37
37
38
use Koha::Libraries;
38
use Koha::Libraries;
39
use Koha::Holds;
39
40
40
=head1 NAME
41
=head1 NAME
41
42
Lines 217-223 sub GetRecords { Link Here
217
218
218
        # Get most of the needed data
219
        # Get most of the needed data
219
        my $biblioitemnumber = $biblioitem->{'biblioitemnumber'};
220
        my $biblioitemnumber = $biblioitem->{'biblioitemnumber'};
220
        my $reserves         = GetReservesFromBiblionumber({ biblionumber => $biblionumber });
221
        my $reserves         = Koha::Holds->search({ biblionumber => $biblionumber })->unblessed;
221
        my $issues           = GetBiblioIssues($biblionumber);
222
        my $issues           = GetBiblioIssues($biblionumber);
222
        my $items            = GetItemsByBiblioitemnumber($biblioitemnumber);
223
        my $items            = GetItemsByBiblioitemnumber($biblioitemnumber);
223
224
Lines 234-239 sub GetRecords { Link Here
234
            $item->{'holdingbranchname'} = $holding_library ? $holding_library->branchname : '';
235
            $item->{'holdingbranchname'} = $holding_library ? $holding_library->branchname : '';
235
        }
236
        }
236
237
238
        foreach my $reserve (@$reserves) {
239
            # For backward compatibility
240
            $reserve->{rtimestamp} = $reserve->{timestamp};
241
        }
242
237
        # Hashref building...
243
        # Hashref building...
238
        $biblioitem->{'items'}->{'item'}       = $items;
244
        $biblioitem->{'items'}->{'item'}       = $items;
239
        $biblioitem->{'reserves'}->{'reserve'} = $reserves;
245
        $biblioitem->{'reserves'}->{'reserve'} = $reserves;
240
- 

Return to bug 16246