Lines 255-266
foreach my $field (@fields) {
Link Here
|
255 |
@items2hide) ); |
255 |
@items2hide) ); |
256 |
my @subf = $field->subfields; |
256 |
my @subf = $field->subfields; |
257 |
my %this_row; |
257 |
my %this_row; |
|
|
258 |
my $hideitem=0; |
258 |
|
259 |
|
259 |
# loop through each subfield |
260 |
# loop through each subfield |
260 |
for my $i ( 0 .. $#subf ) { |
261 |
for my $i ( 0 .. $#subf ) { |
261 |
my $sf_def = $tagslib->{ $field->tag() }->{ $subf[$i][0] }; |
262 |
my $sf_def = $tagslib->{ $field->tag() }->{ $subf[$i][0] }; |
|
|
263 |
#warn "subf:$i $sf_def->{kohafield} $sf_def->{lib} $subf[$i][0]"; # see errlog to learn the mappings |
262 |
next if ( ($sf_def->{tab}||0) != 10 ); |
264 |
next if ( ($sf_def->{tab}||0) != 10 ); |
263 |
next if ( ($sf_def->{hidden}||0) > 0 ); |
265 |
next if ( ($sf_def->{hidden}||0) > 0 ); |
|
|
266 |
( $hideitem=1) if (C4::Context->preference("hidelostitems") && ($sf_def->{kohafield} eq 'items.itemlost') && ($subf[$i][0] > 0) ); |
264 |
$witness{ $subf[$i][0] } = $sf_def->{lib}; |
267 |
$witness{ $subf[$i][0] } = $sf_def->{lib}; |
265 |
|
268 |
|
266 |
if ( $sf_def->{isurl} ) { |
269 |
if ( $sf_def->{isurl} ) { |
Lines 274-280
foreach my $field (@fields) {
Link Here
|
274 |
$subf[$i][1], '', $tagslib, '', 'opac' ); |
277 |
$subf[$i][1], '', $tagslib, '', 'opac' ); |
275 |
} |
278 |
} |
276 |
} |
279 |
} |
277 |
if (%this_row) { |
280 |
if (%this_row && !$hideitem) { |
278 |
push( @big_array, \%this_row ); |
281 |
push( @big_array, \%this_row ); |
279 |
} |
282 |
} |
280 |
} |
283 |
} |
Lines 304-313
for ( my $i = 0 ; $i <= $#big_array ; $i++ ) {
Link Here
|
304 |
push( @item_value_loop, \%row_data ); |
307 |
push( @item_value_loop, \%row_data ); |
305 |
} |
308 |
} |
306 |
|
309 |
|
307 |
foreach my $subfield_code ( keys(%witness) ) { |
310 |
|
308 |
my %header_value; |
311 |
if (@item_value_loop > 0) { # prevent display of header if no items to display |
309 |
$header_value{header_value} = $witness{$subfield_code}; |
312 |
foreach my $subfield_code ( keys(%witness) ) { |
310 |
push( @header_value_loop, \%header_value ); |
313 |
my %header_value; |
|
|
314 |
$header_value{header_value} = $witness{$subfield_code}; |
315 |
push( @header_value_loop, \%header_value ); |
316 |
} |
311 |
} |
317 |
} |
312 |
|
318 |
|
313 |
if(C4::Context->preference("ISBD")) { |
319 |
if(C4::Context->preference("ISBD")) { |
314 |
- |
|
|