|
Lines 169-186
foreach my $biblioNumber (@biblionumbers) {
Link Here
|
| 169 |
next unless $biblio; |
169 |
next unless $biblio; |
| 170 |
|
170 |
|
| 171 |
$biblioData->{object} = $biblio; |
171 |
$biblioData->{object} = $biblio; |
| 172 |
my $holds = $biblio->holds; |
172 |
my $reservecount = $biblio->holds->search({ found => [ {"!=" => "W"},undef] })->count; |
| 173 |
my $rank = $holds->count; |
173 |
$biblioData->{reservecount} = $reservecount; |
| 174 |
$biblioData->{reservecount} = 1; # new reserve |
174 |
$biblioData->{rank} = $reservecount + 1; |
| 175 |
while ( my $hold = $holds->next ) { |
|
|
| 176 |
if ( $hold->is_waiting ) { |
| 177 |
$rank--; |
| 178 |
} |
| 179 |
else { |
| 180 |
$biblioData->{reservecount}++; |
| 181 |
} |
| 182 |
} |
| 183 |
$biblioData->{rank} = $rank + 1; |
| 184 |
} |
175 |
} |
| 185 |
|
176 |
|
| 186 |
# |
177 |
# |
| 187 |
- |
|
|