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 207-213 sub GetRecords { Link Here
207
208
208
        # Get most of the needed data
209
        # Get most of the needed data
209
        my $biblioitemnumber = $biblioitem->{'biblioitemnumber'};
210
        my $biblioitemnumber = $biblioitem->{'biblioitemnumber'};
210
        my $reserves         = GetReservesFromBiblionumber({ biblionumber => $biblionumber });
211
        my $reserves         = Koha::Holds->search({ biblionumber => $biblionumber })->unblessed;
211
        my $issues           = GetBiblioIssues($biblionumber);
212
        my $issues           = GetBiblioIssues($biblionumber);
212
        my $items            = GetItemsByBiblioitemnumber($biblioitemnumber);
213
        my $items            = GetItemsByBiblioitemnumber($biblioitemnumber);
213
214
Lines 224-229 sub GetRecords { Link Here
224
            $item->{'holdingbranchname'} = $holding_library ? $holding_library->branchname : '';
225
            $item->{'holdingbranchname'} = $holding_library ? $holding_library->branchname : '';
225
        }
226
        }
226
227
228
        foreach my $reserve (@$reserves) {
229
            # For backward compatibility
230
            $reserve->{rtimestamp} = $reserve->{timestamp};
231
        }
232
227
        # Hashref building...
233
        # Hashref building...
228
        $biblioitem->{'items'}->{'item'}       = $items;
234
        $biblioitem->{'items'}->{'item'}       = $items;
229
        $biblioitem->{'reserves'}->{'reserve'} = $reserves;
235
        $biblioitem->{'reserves'}->{'reserve'} = $reserves;
230
- 

Return to bug 16246