Lines 206-211
my $marcseriesarray = GetMarcSeries ($record,$marcflavour);
Link Here
|
206 |
my $marcurlsarray = GetMarcUrls ($record,$marcflavour); |
206 |
my $marcurlsarray = GetMarcUrls ($record,$marcflavour); |
207 |
my $subtitle = GetRecordValue('subtitle', $record, GetFrameworkCode($biblionumber)); |
207 |
my $subtitle = GetRecordValue('subtitle', $record, GetFrameworkCode($biblionumber)); |
208 |
|
208 |
|
|
|
209 |
my @noitemlocations = (); |
210 |
my $location_noitems = 0; |
211 |
my $noitemlocation; |
212 |
my @field852s = $record->field('852'); |
213 |
|
214 |
for my $field852 (@field852s) { |
215 |
$location_noitems = 1; |
216 |
my %noitemloc; |
217 |
$noitemloc{'noitemloc'} = $field852->subfield('a'); |
218 |
|
219 |
if ($field852->subfield('b')) { |
220 |
my @subfieldb = $field852->subfield('b'); |
221 |
$noitemloc{'noitemloc'} .= '--' . join('--', @subfieldb); |
222 |
} |
223 |
if ($field852->subfield('c')) { |
224 |
my @subfieldc = $field852->subfield('c'); |
225 |
$noitemloc{'noitemloc'} .= ' (' . join('/', @subfieldc) . ')'; |
226 |
} |
227 |
push(@noitemlocations, \%noitemloc); |
228 |
} |
229 |
|
209 |
$template->param( |
230 |
$template->param( |
210 |
MARCNOTES => $marcnotesarray, |
231 |
MARCNOTES => $marcnotesarray, |
211 |
MARCSUBJCTS => $marcsubjctsarray, |
232 |
MARCSUBJCTS => $marcsubjctsarray, |
Lines 219-224
my $subtitle = GetRecordValue('subtitle', $record, GetFrameworkCode($bib
Link Here
|
219 |
itemdata_uri => $itemfields{uri}, |
240 |
itemdata_uri => $itemfields{uri}, |
220 |
itemdata_copynumber => $itemfields{copynumber}, |
241 |
itemdata_copynumber => $itemfields{copynumber}, |
221 |
itemdata_itemnotes => $itemfields{itemnotes}, |
242 |
itemdata_itemnotes => $itemfields{itemnotes}, |
|
|
243 |
location_noitems => $location_noitems, |
244 |
NOITEMLOCATIONS => \@noitemlocations, |
222 |
authorised_value_images => $biblio_authorised_value_images, |
245 |
authorised_value_images => $biblio_authorised_value_images, |
223 |
subtitle => $subtitle, |
246 |
subtitle => $subtitle, |
224 |
); |
247 |
); |
225 |
- |
|
|