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

(-)a/catalogue/MARCdetail.pl (-1 / +4 lines)
Lines 247-252 my @fields = $record->fields(); Link Here
247
my %witness
247
my %witness
248
  ; #---- stores the list of subfields used at least once, with the "meaning" of the code
248
  ; #---- stores the list of subfields used at least once, with the "meaning" of the code
249
my @big_array;
249
my @big_array;
250
my $norequests = 1;
250
foreach my $field (@fields) {
251
foreach my $field (@fields) {
251
    next if ( $field->tag() < 10 );
252
    next if ( $field->tag() < 10 );
252
    my @subf = $field->subfields;
253
    my @subf = $field->subfields;
Lines 260-270 foreach my $field (@fields) { Link Here
260
        $tagslib->{ $field->tag() }->{ $subf[$i][0] }->{lib};
261
        $tagslib->{ $field->tag() }->{ $subf[$i][0] }->{lib};
261
        $this_row{ $subf[$i][0] } = GetAuthorisedValueDesc( $field->tag(),
262
        $this_row{ $subf[$i][0] } = GetAuthorisedValueDesc( $field->tag(),
262
                        $subf[$i][0], $subf[$i][1], '', $tagslib) || $subf[$i][1];
263
                        $subf[$i][0], $subf[$i][1], '', $tagslib) || $subf[$i][1];
264
        $norequests = 0 if $subf[$i][1] ==0 and $tagslib->{ $field->tag() }->{ $subf[$i][0] }->{kohafield} eq 'items.notforloan';
263
    }
265
    }
264
    if (%this_row) {
266
    if (%this_row) {
265
        push( @big_array, \%this_row );
267
        push( @big_array, \%this_row );
266
    }
268
    }
267
}
269
}
270
268
my ($holdingbrtagf,$holdingbrtagsubf) = &GetMarcFromKohaField("items.holdingbranch",$frameworkcode);
271
my ($holdingbrtagf,$holdingbrtagsubf) = &GetMarcFromKohaField("items.holdingbranch",$frameworkcode);
269
@big_array = sort {$a->{$holdingbrtagsubf} cmp $b->{$holdingbrtagsubf}} @big_array;
272
@big_array = sort {$a->{$holdingbrtagsubf} cmp $b->{$holdingbrtagsubf}} @big_array;
270
273
Lines 306-311 if ($subscriptionscount) { Link Here
306
}
309
}
307
310
308
$template->param (
311
$template->param (
312
    norequests              => $norequests, 
309
    item_loop               => \@item_value_loop,
313
    item_loop               => \@item_value_loop,
310
    item_header_loop        => \@header_value_loop,
314
    item_header_loop        => \@header_value_loop,
311
    biblionumber            => $biblionumber,
315
    biblionumber            => $biblionumber,
312
- 

Return to bug 1731