|
Lines 277-288
foreach my $field (@fields) {
Link Here
|
| 277 |
@items2hide) ); |
277 |
@items2hide) ); |
| 278 |
my @subf = $field->subfields; |
278 |
my @subf = $field->subfields; |
| 279 |
my $item; |
279 |
my $item; |
|
|
280 |
my $hideitem=0; |
| 280 |
|
281 |
|
| 281 |
# loop through each subfield |
282 |
# loop through each subfield |
| 282 |
for my $i ( 0 .. $#subf ) { |
283 |
for my $i ( 0 .. $#subf ) { |
| 283 |
my $sf_def = $tagslib->{ $field->tag() }->{ $subf[$i][0] }; |
284 |
my $sf_def = $tagslib->{ $field->tag() }->{ $subf[$i][0] }; |
| 284 |
next if ( ($sf_def->{tab}||0) != 10 ); |
285 |
next if ( ($sf_def->{tab}||0) != 10 ); |
| 285 |
next if ( ($sf_def->{hidden}||0) > 0 ); |
286 |
next if ( ($sf_def->{hidden}||0) > 0 ); |
|
|
287 |
( $hideitem=1) if (C4::Context->preference("hidelostitems") && ($sf_def->{kohafield} eq 'items.itemlost') && ($subf[$i][0] > 0) ); |
| 286 |
push @item_subfield_codes, $subf[$i][0]; |
288 |
push @item_subfield_codes, $subf[$i][0]; |
| 287 |
$witness{ $subf[$i][0] } = $sf_def->{lib}; |
289 |
$witness{ $subf[$i][0] } = $sf_def->{lib}; |
| 288 |
|
290 |
|
|
Lines 297-303
foreach my $field (@fields) {
Link Here
|
| 297 |
$subf[$i][1], '', $tagslib, '', 'opac' ); |
299 |
$subf[$i][1], '', $tagslib, '', 'opac' ); |
| 298 |
} |
300 |
} |
| 299 |
} |
301 |
} |
| 300 |
push @item_loop, $item if $item; |
302 |
push @item_loop, $item if ( $item && !$hideitem ); |
| 301 |
} |
303 |
} |
| 302 |
my ( $holdingbrtagf, $holdingbrtagsubf ) = |
304 |
my ( $holdingbrtagf, $holdingbrtagsubf ) = |
| 303 |
&GetMarcFromKohaField( "items.holdingbranch", $framework ); |
305 |
&GetMarcFromKohaField( "items.holdingbranch", $framework ); |
|
Lines 307-317
my ( $holdingbrtagf, $holdingbrtagsubf ) =
Link Here
|
| 307 |
@item_subfield_codes = uniq @item_subfield_codes; |
309 |
@item_subfield_codes = uniq @item_subfield_codes; |
| 308 |
# fill item info |
310 |
# fill item info |
| 309 |
my @item_header_loop; |
311 |
my @item_header_loop; |
| 310 |
for my $subfield_code ( @item_subfield_codes ) { |
312 |
if (@item_value_loop > 0) { # prevent display of header if no items to display |
| 311 |
push @item_header_loop, $witness{$subfield_code}; |
313 |
for my $subfield_code ( @item_subfield_codes ) { |
| 312 |
for my $item_data ( @item_loop ) { |
314 |
push @item_header_loop, $witness{$subfield_code}; |
| 313 |
$item_data->{$subfield_code} ||= " " |
315 |
for my $item_data ( @item_loop ) { |
| 314 |
} |
316 |
$item_data->{$subfield_code} ||= " " |
|
|
317 |
} |
| 318 |
} |
| 315 |
} |
319 |
} |
| 316 |
|
320 |
|
| 317 |
if ( C4::Context->preference("OPACISBD") ) { |
321 |
if ( C4::Context->preference("OPACISBD") ) { |
| 318 |
- |
|
|