View | Details | Raw Unified | Return to bug 2946
Collapse All | Expand All

(-)a/opac/opac-MARCdetail.pl (-6 / +11 lines)
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
- 

Return to bug 2946