|
Lines 267-273
my %witness
Link Here
|
| 267 |
; #---- stores the list of subfields used at least once, with the "meaning" of the code |
267 |
; #---- stores the list of subfields used at least once, with the "meaning" of the code |
| 268 |
my @item_subfield_codes; |
268 |
my @item_subfield_codes; |
| 269 |
my @item_loop; |
269 |
my @item_loop; |
| 270 |
my $norequests = 1; |
|
|
| 271 |
|
270 |
|
| 272 |
foreach my $field (@fields) { |
271 |
foreach my $field (@fields) { |
| 273 |
next if ( $field->tag() < 10 ); |
272 |
next if ( $field->tag() < 10 ); |
|
Lines 295-302
foreach my $field (@fields) {
Link Here
|
| 295 |
$item->{ $subf[$i][0] } .= GetAuthorisedValueDesc( $field->tag(), $subf[$i][0], $subf[$i][1], '', $tagslib) || $subf[$i][1]; |
294 |
$item->{ $subf[$i][0] } .= GetAuthorisedValueDesc( $field->tag(), $subf[$i][0], $subf[$i][1], '', $tagslib) || $subf[$i][1]; |
| 296 |
} |
295 |
} |
| 297 |
|
296 |
|
| 298 |
$norequests = 0 if $tagslib->{ $field->tag() }->{ $subf[$i][0] }->{kohafield} eq 'items.notforloan' and $subf[$i][1] == 0; |
|
|
| 299 |
|
| 300 |
my $kohafield = $tagslib->{ $field->tag() }->{ $subf[$i][0] }->{kohafield}; |
297 |
my $kohafield = $tagslib->{ $field->tag() }->{ $subf[$i][0] }->{kohafield}; |
| 301 |
$item->{ $subf[$i][0] } = output_pref( { str => $item->{ $subf[$i][0] }, dateonly => 1 } ) |
298 |
$item->{ $subf[$i][0] } = output_pref( { str => $item->{ $subf[$i][0] }, dateonly => 1 } ) |
| 302 |
if grep { $kohafield eq $_ } |
299 |
if grep { $kohafield eq $_ } |
|
Lines 330-336
if ($subscriptionscount) {
Link Here
|
| 330 |
} |
327 |
} |
| 331 |
|
328 |
|
| 332 |
$template->param ( |
329 |
$template->param ( |
| 333 |
norequests => $norequests, |
|
|
| 334 |
item_loop => \@item_loop, |
330 |
item_loop => \@item_loop, |
| 335 |
item_header_loop => \@item_header_loop, |
331 |
item_header_loop => \@item_header_loop, |
| 336 |
item_subfield_codes => \@item_subfield_codes, |
332 |
item_subfield_codes => \@item_subfield_codes, |