Lines 2810-2821
sub CanBookBeRenewed {
Link Here
|
2810 |
# by pushing all the elements onto an array and removing the duplicates. |
2810 |
# by pushing all the elements onto an array and removing the duplicates. |
2811 |
my @reservable; |
2811 |
my @reservable; |
2812 |
foreach my $b (@borrowernumbers) { |
2812 |
foreach my $b (@borrowernumbers) { |
2813 |
my ($borr) = C4::Members::GetMemberDetails($b); |
2813 |
my ($borr) = C4::Members::GetMember( borrowernumber => $b); |
2814 |
foreach my $i (@itemnumbers) { |
2814 |
foreach my $i (@itemnumbers) { |
2815 |
my $item = GetItem($i); |
2815 |
my $item = GetItem($i); |
2816 |
if ( IsAvailableForItemLevelRequest( $item, $borr ) |
2816 |
if ( !IsItemOnHoldAndFound($i) |
2817 |
&& CanItemBeReserved( $b, $i ) |
2817 |
&& IsAvailableForItemLevelRequest( $item, $borr ) |
2818 |
&& !IsItemOnHoldAndFound($i) ) |
2818 |
&& CanItemBeReserved( $b, $i ) ) |
2819 |
{ |
2819 |
{ |
2820 |
push( @reservable, $i ); |
2820 |
push( @reservable, $i ); |
2821 |
} |
2821 |
} |
2822 |
- |
|
|