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

(-)a/C4/ILSDI/Services.pm (-2 / +8 lines)
Lines 36-41 use DateTime; Link Here
36
use C4::Auth;
36
use C4::Auth;
37
use C4::Members::Attributes qw(GetBorrowerAttributes);
37
use C4::Members::Attributes qw(GetBorrowerAttributes);
38
38
39
use Koha::Holds;
40
39
=head1 NAME
41
=head1 NAME
40
42
41
C4::ILS-DI::Services - ILS-DI Services
43
C4::ILS-DI::Services - ILS-DI Services
Lines 209-215 sub GetRecords { Link Here
209
211
210
        # Get most of the needed data
212
        # Get most of the needed data
211
        my $biblioitemnumber = $biblioitem->{'biblioitemnumber'};
213
        my $biblioitemnumber = $biblioitem->{'biblioitemnumber'};
212
        my $reserves         = GetReservesFromBiblionumber({ biblionumber => $biblionumber });
214
        my $reserves         = Koha::Holds->search({ biblionumber => $biblionumber })->unblessed;
213
        my $issues           = GetBiblioIssues($biblionumber);
215
        my $issues           = GetBiblioIssues($biblionumber);
214
        my $items            = GetItemsByBiblioitemnumber($biblioitemnumber);
216
        my $items            = GetItemsByBiblioitemnumber($biblioitemnumber);
215
217
Lines 224-229 sub GetRecords { Link Here
224
            $item->{'holdingbranchname'} = GetBranchName( $item->{'holdingbranch'} );
226
            $item->{'holdingbranchname'} = GetBranchName( $item->{'holdingbranch'} );
225
        }
227
        }
226
228
229
        foreach my $reserve (@$reserves) {
230
            # For backward compatibility
231
            $reserve->{rtimestamp} = $reserve->{timestamp};
232
        }
233
227
        # Hashref building...
234
        # Hashref building...
228
        $biblioitem->{'items'}->{'item'}       = $items;
235
        $biblioitem->{'items'}->{'item'}       = $items;
229
        $biblioitem->{'reserves'}->{'reserve'} = $reserves;
236
        $biblioitem->{'reserves'}->{'reserve'} = $reserves;
230
- 

Return to bug 16246