Lines 137-143
sub GetHoldsQueueItems {
Link Here
|
137 |
while ( my $row = $sth->fetchrow_hashref ){ |
137 |
while ( my $row = $sth->fetchrow_hashref ){ |
138 |
my $record = GetMarcBiblio($row->{biblionumber}); |
138 |
my $record = GetMarcBiblio($row->{biblionumber}); |
139 |
if ($record){ |
139 |
if ($record){ |
140 |
$row->{subtitle} = GetRecordValue('subtitle',$record,'')->[0]->{subfield}; |
140 |
$row->{subtitle} = [ map { $_->{subfield} } @{ GetRecordValue( 'subtitle', $record, '' ) } ]; |
141 |
$row->{parts} = GetRecordValue('parts',$record,'')->[0]->{subfield}; |
141 |
$row->{parts} = GetRecordValue('parts',$record,'')->[0]->{subfield}; |
142 |
$row->{numbers} = GetRecordValue('numbers',$record,'')->[0]->{subfield}; |
142 |
$row->{numbers} = GetRecordValue('numbers',$record,'')->[0]->{subfield}; |
143 |
} |
143 |
} |