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

(-)a/C4/Reserves.pm (-26 lines)
Lines 140-147 BEGIN { Link Here
140
        IsItemOnHoldAndFound
140
        IsItemOnHoldAndFound
141
141
142
        GetMaxPatronHoldsForRecord
142
        GetMaxPatronHoldsForRecord
143
144
        &GetHoldGroupHolds
145
    );
143
    );
146
    @EXPORT_OK = qw( MergeHolds );
144
    @EXPORT_OK = qw( MergeHolds );
147
}
145
}
Lines 2281-2309 sub GetMaxPatronHoldsForRecord { Link Here
2281
    return $max;
2279
    return $max;
2282
}
2280
}
2283
2281
2284
=head2 GetHoldGroupHolds
2285
2286
    my @reserves = GetHoldGroupHolds($hold_group_id);
2287
2288
Fetch all reserve from a hold group.
2289
2290
=cut
2291
2292
sub GetHoldGroupHolds {
2293
    my ($hold_group_id) = @_;
2294
2295
    my $dbh = C4::Context->dbh;
2296
2297
    my $reserves = $dbh->selectall_arrayref(q{
2298
        SELECT * FROM reserves
2299
        WHERE hold_group_id = ?
2300
    }, { Slice => {} }, $hold_group_id);
2301
2302
    return () unless defined $reserves;
2303
2304
    return @$reserves;
2305
}
2306
2307
=head1 AUTHOR
2282
=head1 AUTHOR
2308
2283
2309
Koha Development Team <http://koha-community.org/>
2284
Koha Development Team <http://koha-community.org/>
2310
- 

Return to bug 15516