Lines 127-134
foreach my $issue ( @issue_list ) {
Link Here
|
127 |
# check if item is renewable |
127 |
# check if item is renewable |
128 |
my ($status,$renewerror) = CanBookBeRenewed( $borrowernumber, $issue->{'itemnumber'} ); |
128 |
my ($status,$renewerror) = CanBookBeRenewed( $borrowernumber, $issue->{'itemnumber'} ); |
129 |
($issue->{'renewcount'},$issue->{'renewsallowed'},$issue->{'renewsleft'}) = GetRenewCount($borrowernumber, $issue->{'itemnumber'}); |
129 |
($issue->{'renewcount'},$issue->{'renewsallowed'},$issue->{'renewsleft'}) = GetRenewCount($borrowernumber, $issue->{'itemnumber'}); |
130 |
|
130 |
$issue->{'status'} = $status && C4::Context->preference("OpacRenewalAllowed"); |
131 |
$issue->{'status'} = $status || C4::Context->preference("OpacRenewalAllowed"); |
131 |
if($renewerror eq "too_many"){ $issue->{'too_many'} = 1 }; |
|
|
132 |
if($renewerror eq "on_reserve"){ $issue->{'on_reserve'} = 1 }; |
132 |
|
133 |
|
133 |
if ( $issue->{'overdue'} ) { |
134 |
if ( $issue->{'overdue'} ) { |
134 |
push @overdues, $issue; |
135 |
push @overdues, $issue; |
135 |
- |
|
|