|
Lines 195-200
foreach my $res (@reserves) {
Link Here
|
| 195 |
my $publictype = $res->{'publictype'}; |
195 |
my $publictype = $res->{'publictype'}; |
| 196 |
$res->{$publictype} = 1; |
196 |
$res->{$publictype} = 1; |
| 197 |
$res->{'waiting'} = 1 if $res->{'found'} eq 'W'; |
197 |
$res->{'waiting'} = 1 if $res->{'found'} eq 'W'; |
|
|
198 |
$res->{'formattedwaitingdate'} = format_date($res->{'waitingdate'}); |
| 198 |
$res->{'branch'} = $branches->{ $res->{'branchcode'} }->{'branchname'}; |
199 |
$res->{'branch'} = $branches->{ $res->{'branchcode'} }->{'branchname'}; |
| 199 |
my $biblioData = GetBiblioData($res->{'biblionumber'}); |
200 |
my $biblioData = GetBiblioData($res->{'biblionumber'}); |
| 200 |
$res->{'reserves_title'} = $biblioData->{'title'}; |
201 |
$res->{'reserves_title'} = $biblioData->{'title'}; |
| 201 |
- |
|
|